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SCHNEIDER CPC 6128 


Computer mit integriertem 
Diskettenlaufwerk 


Die logische Fortsetzung 


Der riesige Erfolg der Schneider-Computer CPC464 und CPC664 bildete eine 
solide Grundlage fir die Weiterentwicklung auf diesem Gebiet, so da8 wir jetzt 
voller Stolz den CPC6128 vorstellen kénnen. 


Gema& unserem Grundsatz der Kompatibilitat kann der CPC6128 mit der 
Software der CPC464-und CPC664-Gerate betrieben werden. Er wurde zusatzlich 
mit weiteren 64K-Byte RAM fir das CP/M-Betriebssystem und andere 
Anwendersoftware ausgeritstet. 


CP/M Plus 


CP/M Plus (auch unter dem Namen CP/M 3.1 bekannt) bietet leichten Zugang zur 
CP/M 80 Software-Bibliothek. Die 61K TPA bedeuten, da8 jedes CP/M 80 
Programm genug Platz findet, und da8 eine Unmenge von Daten aufgenommen 
werden kann. CP/M Plus ist mit CP/M 2.2 kompatibel. Trotzdem haben wir beide 
Versionen angeboten, um sicherzugehen, daf Anwenderprogramme, die mit 
Firmware-Eigenschaften der Schneider CP/M 2.2-Systeme entwickelt wurden, 
ohne Abanderungen betrieben werden kénnen. 


CP/M Plus bietet viele Verbesserungen, mit der die Leistung des Systems erhoht 
wurde, und die CP/M 2.2 Software, die heute auf dem Markt ist, kann diese 
Moglichkeiten problemlos ausschépfen. Das CP/M Plus System besitzt die 
besondere Higenschaft, den Bildschirm auf die Eigenschaften von VT52 sowie 
Zenith Z'19 und Z/29 Terminals einstellen zu kénnen, so daB die Software dieser 
Gerate ohne weiteres auf dem CPC6128 betrieben werden kann. 
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GSX 


Diese Version von CP/M Plus beinhaltet ein erweitertes Graphik-Betriebssystem, 
das sogenannte GSX (Graphics Extension System). Dadurch kénnen Drucker bzw. 
Plotter und der Graphik-Bildschirm mit Standardanweisungen aus den 
Anwenderprogrammen' direkt angesprochen werden. Das Prinzip der 
CP/M-Programmvertraglichkeit geht also iber die Text-Bildschirmkompatibilitat 
hinaus. Software, die sich die Méglichkeiten von GSX zunutze macht, kann an 
diverse Zeichengerate angeschlossen werden, um Kurven, Diagramme und 
ahnliches auszudrucken. 


Dr. LOGO 


Die Programmiersprache LOGO von Digital Research spielt eine immer groBere 
Rolle im Programmierunterricht an den Schulen. Der gréBere Speicher des 6128 
erméglichte es, das erstmals im CP/M 2.2 verwendete Dr. LOGO zu erweitern. 
Natirlich werden alle Programme ab SCHNEIDER CP/M 2.2 aufwarts 
kompatibel sein. 


Disketten 


Der CPC664 mit seinem eingebauten Diskettenlaufwerk war ein Richtungsweiser 
fiir die Zukunft. Auch der CPC6128 bringt dem zunehmend anspruchsvollen 
Benutzer, der Personal-Computer Leistung zum Home-Computerpreis wiinscht, 
den preiswerten Diskettenbetrieb. Die Disketten aller Schneider-Systeme sind 
austauschbar, wenngleich natirlich Programme, die mit den neuen 
Moglichkeiten von CP/M Plus und GSX arbeiten, nicht auf Geraten betrieben 
werden kénnen, denen diese Méglichkeiten fehlen. 


Software 


Mit dem CPC6128 kann die gesamte CPC664 und CPC464/DDI1 
Diskettensoftware betrieben werden, sowie nahezu jede CPC464 Software 
(vorausgesetzt, daB an den CPC6128 ein Kassettenlaufwerk angeschlossen wird). 
Auf diese Weise hat der Anwender sofort eine beneidenswerte Auswahl aus 
Schneiders groBem Softwareangebot, sowie die Produkte zahlreicher 
unabhangiger Softwareanbieter zur Verfiigung. 
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Eine Zusammenstellung etwaiger Veradnderungen oder Korrekturen dieses 
Handbuches ist gegen Einsendung eines frankierten und rickadressierten 
Briefumschlags bei Schneider erhaltlich. 
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Vervielfaltigung und Weitergabe von Informationen aus diesem Benutzerhandbuch - auch 
auszugsweise- bedtirfen der vorherigen schriftlichen Zustimmung der Schneider Computer 
Division. 

Alle technischen Daten, Informationen sowie Eigenschaften des in diesem Benutzerhandbuch 
beschriebenen Produktes wurden nach bestem Wissen zusammengestellt und entsprechen dem 
Stand bei Drucklegung. 


Anderungen und Verbesserungen des Produktes aufgrund technischer Neuentwicklungen sind 
moglich. 
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Wichtige Hinweise 


Vor der Inbetriebnahme sind folgende Anweisungen unbedingt 
zu beachten. 


Hinweise zur Inbetriebnahme: 


on 


Netzstecker immer an einer geerdeten Steckdose anschliefBen. 
Die Gerate nur an eine Stromversorgung mit 220-240V ~ 50Hz anschliefen. 


Gerate nicht offnen. Sie enthalten keine vom Benutzer reparierbaren Teile. 
Servicearbeiten nur von hierzu autorisierten Technikern durchftihren 
lassen. 


Um die Augen nicht unnétig zu belasten, den Monitor so weit wie méglich 
von der Tastatur entfernt aufstellen. Der Raum sollte gut beleuchtet sein. 
Der Helligkeitsregler (mit BRIGHTNESS bezeichnet) am Monitor sollte so 
niedrig wie méglich eingestellt sein. 


Den Computer frontal vor dem Monitor, aber so weit wie moéglich von ihm 
entfernt aufstellen. Um _ eine gréftmégliche Datensicherheit zu 
gewahrleisten, sollte das Diskettenlaufwerk nicht direkt vor dem Bildschirm 
stehen, sondern rechts davon. Stellen Sie den Computer nicht in die Nahe 
von elektrischen Stérfeldern. 


Diskettenlaufwerk und Disketten stets auSerhalb starker magnetischer 
Felder halten. 


Arbeiten Sie mit einem Disketten-Doppellaufwerk, achten Sie darauf, da8 
das verbindende Flachbandkabel nicht in der Nahe des Netzkabels verlauft. 


Luftungsschlitze dirfen nicht zugedeckt werden. 


Setzen Sie die Gerate nicht extremer Hitze, Kalte, Feuchtigkeit oder Staub 
aus. 
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Hinweise zum Betrieb: 


(Lassen Sie sich durch die vielen Fachausdriicke in diesem Abschnitt nicht 
verwirren. Die Bedeutung dieser Hinweise wird mit dem Durcharbeiten des 
Handbuches klarer.) 


1. 


Schalten Sie die Gerate niemals an oder ab, solange sich eine Diskette im 
Laufwerk befindet, da andernfalls wertvolle Programme oder Daten auf der 
Diskette zerstért werden kénnten. 


Machen Sie immer Reservekopien von Disketten mit wertvollem Inhalt. Es 
ist besonders wichtig, Kopien von den mitgelieferten CP/M Systemdisketten 
des CPC6128 zu machen. Der Verlust bzw. die Beschadigung dieser 
Disketten kénnte mit hohen Kosten verbunden sein. 


Um zu verhindern, da8 Sie Ihre CP/M Systemdisketten aus Versehen 
tiberschreiben, vergewissern Sie sich, daB die Schreibschutzlécher auf den 
Disketten immer offen sind. 


Wenn Sie mit einem Disketten-Doppellaufwerk arbeiten, d.h. wenn Sie sich 
zusatzlich ein Schneider FD1 angeschafft haben, schalten Sie das zweite 
Laufwerk immer an, bevor Sie den Computer einschalten. 


Bertihren Sie niemals die Oberflache der Diskette, die sich im 
Plastikgehause befindet. 


Nehmen Sie niemals eine Diskette aus dem Laufwerk, wahrend etwas auf 
sie geschrieben oder von ihr gelesen wird. 


Bedenken Sie immer, da8 durch das Formatieren einer Diskette ihr Inhalt 
geléscht wird. 


Das eingebaute Disketten-Interface beansprucht einen kleinen Teil des 
Speichers, der méglicherweise fir Kassettenprogramme bendtigt wird, die 
fiir den CPC464 geschrieben wurden. Diese Kassetten laufen auf dem 
CPC6128 mit angeschlossenem Kassettenlaufwerk nicht einwandfrei. In der 
Regel lauft jedoch Schneider-Software fiir den CPC464 auch auf dem 
CPC6128. 


Die Lizenz fiir Ihre CP/M Systemdisketten (die mit einer elektronisch 
codierten Seriennummer versehen wurden) erlaubt ihren Betrieb nur auf 
einem bestimmten Computersystem. Insbesondere diirfen Sie keiner anderen 
Person eine Kopie Ihrer serienmakig codierten CP/M-Diskette tberlassen. 
Lesen Sie bitte die Lizenzbestimmungen im 1.Teil des Anhangs aufmerksam 
durch. 
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Kapitel ] 
GRUNDLAGENKURS 


Teil 1: Inbetriebnahme des 
Computers 


Der CPC6128 kann wahlweise mit folgenden Geraten betrieben werden: 
1. Schneider GT65 Griinmonitor 
2. Schneider CTM 644 Farbmonitor 


3. Schneider MP2 Modulator mit Netzteil und einem normalen 
Fernsehgerat (UHF) 


Wenn der Computer nicht benutzt wird, 
Netzstecker ziehen. 


Entfernen Sie keine Schrauben und versuchen Sie nicht, das Gehaduse des 
Computers, des Monitors oder des Modulators zu éffnen. Beachten Sie die 
Warnungen auf den Etiketten an der Unter- bzw. Riickseite der Gerate. 


VORSICHT! 


Innenteile unter Spannung. Keine Schrauben lésen. 
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AnschluB des Griin- oder Farbmonitors 
an den Computer 


(Wenn Sie den CPC6128 mit einem MP2 Modulator mit Netzteil betreiben, gehen 
Sie gleich zum nachsten Abschnitt aber). 


1. Vergewissern Sie sich, da der Monitor nicht an das Stromnetz 
angeschlossen ist. 


2. Stecken Sie das Kabel mit dem gréBeren 6-poligen DIN-Stecker, das vorn 
aus dem Monitor kommt, in die mit MONITOR bezeichnete Buchse an der 
Rickseite des Computers. 


3. Stecken sie das Kabel mit dem kleineren Stecker (5V Gleichspannung), das 
vorn aus dem Monitor kommt, in die mit 5V DC bezeichnete Buchse an der 
Rickseite des Computers. 


4. Stecken Sie das Kabel mit dem kleinen Stecker (12V Gleichspannung), das 
hinten aus dem Computer kommt, in die Buchse an der Vorderseite des 
Monitors. 


| Vorderseite des Monitors 
| 
{ 


Riickseite des Computers 
JUGUOUYOUOU TOG mstane tra ee a ee 
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AnschluB des MP2 Modulator mit Netzteil 
an den Computer 


Der MP2 ist ein Zusatzgerat, mit dem Sie den Computer an Ihren Farbfernseher 
anschlieBen kénnen. Auf diese Weise brauchen Sie auf die vielfaltigen farblichen 
Moglichkeiten des CPC6128 nicht zu verzichten, wenn Sie nur einen 
Griin-Monitor GT65 gekauft haben. 


Der MP2 sollte rechts neben den CPC6128 gestellt werden. 


Vergewissern Sie sich, da der MP2 nicht an das Stromnetz angeschlossen ist. 


2.  Stecken Sie das Kabel mit dem gréferen 6-poligen DIN-Stecker, das aus dem 
MP2 kommt, in die mit MONITOR bezeichnete Buchse an der Rickseite des 
Computers. 


3. Stecken Sie das Kabel mit dem kleineren Stecker (5V Gleichspannung), das 
aus dem MP2 kommt, in die mit 5V DC bezeichnete Buchse an der Riickseite 
des Computers. 


4. Stecken Sie das Kabel mit dem Antennenstecker, das aus dem MP2 kommt, 
in die Antennenbuchse Ihres Fernsehgerates. 


5. Stecken Sie das Kabel mit dem kleinen Stecker (12V Gleichspannung), das 
hinten aus dem Computer kommt, in die Buchse an der Riickseite des MP2. 


Netzstecker Rickseite des MP2 Modulator mit Netzteil Riickseite des Computers 
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Das Einschalten des CPC6128 
mit angeschlossenem GT65 oder CTM644 


(Wenn Sie den CPC6128 mit Modulator/Netzteil betreiben, gehen Sie gleich zum 
nachsten Abschnitt tiber.) 


Wenn Sie die Gerate wie vorstehend beschrieben verbunden haben, stecken Sie 
den Netzstecker in eine Steckdose. Driicken sie den POWER-Knopf rechts unten 
am Monitor. Wenn sich der Knopf in der Aus-Position befindet, ist die 
Stromzufuhr zum System unterbrochen. 


Schalten Sie den Schiebeschalter (POWER) rechts seitlich am Computer auf ON. 


Jetzt sollte tber dem Tastenfeld ein rotes Lampchen aufleuchten und auf dem 
Bildschirm folgendes Bild erscheinen: 


Schneider 128K Microcomputer (v3) 
C 1985 Amstrad Consumer Electronics plc 
and Locomotive Software Ltd. 


BASIC 1.1 


Ready 
a 


Um die Augen nicht unnétig zu belasten, stellen Sie den mit BRIGHTNESS 
bezeichneten Helligkeitsregler so ein, daB die Schrift auf dem Bildschirm nicht zu 
grell erscheint oder verschwimmt. 


Den Helligkeitsregler finden Sie beim GT65 an der Vorderseite rechts unten, und 
beim CTM644 an der rechten Seitenwand. 


Wenn Sie den GT65 Griinmonitor benutzen, miissen Sie méglicherweise auch den 
Kontrast und den Bildfang nachstellen. Die Regler dafiir finden sie vorn unten 
am Monitor. 


Der Kontrast (CONTRAST) sollte so schwach wie méglich eingestellt sein, um den 
Augen das Sehen angenehm zu machen. 


Die Bildfangregelung (V-HOLD) sollte so eingestellt sein, da8 sich das Bild in der 
Mitte des Bildschirms befindet und nicht zittert oder nach oben wegrollt. 
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Das Einschalten des CPC6128 mit 
angeschlossenem MP2 Modulator mit Netzteil 


Wenn Sie die Gerate wie vorstehend beschrieben verbunden haben, stecken Sie 
den Netzstecker in eine Steckdose. 


Schieben Sie jetzt den POWER-Schalter rechts seitlich am Computer auf ON, um 
den Computer anzuschalten. 


Nun sollte tiber dem Tastenfeld ein rotes Lampchen aufleuchten. Sie schalten 
jetzt das Fernsehgerat an und stellen es so ein, da8 Sie ein Signal vom Computer 
erhalten. 


Falls Sie einen Fernseher mit Programmtasten besitzen, driicken Sie eine freie 
bzw. unbenutzte Taste. Drehen Sie am zugehdérigen Regler fir die 
Feineinstellung, wie es in der Gebrauchsanleitung fir Ihren Fernseher 
beschrieben ist, bis Sie - ungefahr bei Kanal 36 - folgendes Bild erhalten: 


Schneider 128K Microcomputer (v3) 
C 1985 Amstrad Consumer Electronics plc 
and Locomotive Software Ltd. 


BASIC 1.1 


Ready 
a 


Justieren Sie den Fernseher, bis Sie ein klares Bild haben. Die Schrift sollte 
goldgelb auf tiefblauem Hintergrund stehen. 


Falls Ihr Fernseher einen Programmdrehwahler hat, drehen Sie den Knopf 
solange, bis das oben gezeigte Bild erscheint und absolut ruhig bleibt (wiederum 
ungefahr bei Kanal 36). 
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AnschluB weiterer Gerate 


Einzelheiten ber den AnschluB weiterer Gerdte an das Standard- 
Computersystem wie: 


Joystick(s) 

Kassettenlaufwerk 

Drucker 

Zweites Diskettenlaufwerk 
Externe Verstarker/Lautsprecher 
Erweiterungsgerate 


..finden Sie im 2. Teil des Kapitels ‘Grundlagenkurs’. 


Uberpriifen Sie zum Schlu8 noch einmal, ob Sie folgende Punkte unter 
‘WICHTIGE HINWEISE’ am Beginn des Handbuches beachtet haben: 


‘Hinweise zur Inbetriebnahme’: Punkt 1, 2, 4, 5, 6, 7 und 8 
‘Hinweise zum Betrieb’: Punkt 1 
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Teil 2: AnschluB der 
Peripheriegerate 


Dieser Abschnitt erlautert den Anschlu8 des weiteren Zubehors, der sogenannten 
Peripheriegerate, an das CPC6128 System. Der Anwendung dieser Gerate sind 
jeweils eigene Abschnitte in diesem Handbuch gewidmet. 


Der Joystick 


Den SCHNEIDER Joystick JY2 kénnen Sie als Zubehér zu ihrem Computer 
kaufen. Er wird in Computerspielen zum Steuern oder SchieBen eingesetzt. Der 
CPC6128 kann mit zwei Joysticks verbunden werden. Der Schneider Joystick JY1 
eignet sich ebenfalls fiir den Betrieb mit dem CPC6128. 


Stecken Sie das Kabel des JY2 in die mit JOYSTICK bezeichnete Buchse am 
Computer. Wenn Sie einen zweiten Joystick anschlie8en méchten, stecken Sie den 
Stecker des zweiten Joysticks in die Buchse am ersten Joystick. 


Weitere Einzelheiten zum Thema ‘Joystick’ finden Sie weiter hinten in diesem 
Handbuch. 


Das Kassettenlaufwerk 


Programme konnen statt auf Diskette auch auf Kassette gespeichert bzw. von 
Kassette gelesen werden. Die Befehle, mit denen Daten auf Diskette oder 
Kassette gespeichert und wieder abgerufen werden kénnen, werden spater 
behandelt. 


Um das Kassettenlaufwerk an den CPC6128 anschlieBen zu kénnen, benétigen 
Sie ein Standard-Verbindungskabel fiir Kassettenrecorder. 


Stecken Sie den gréferen 5-poligen DIN-Stecker des Kabels in die mit TAPE 
bezeichnete Buchse am Computer. 


Stecken Sie das Ende des blauen Kabels in die mit REMOTE oder REM 
bezeichnete Buchse des Kassettengerats. 


Das Ende des roten Kabels stecken Sie in die mit MIC, COMPUTER IN, oder 
INPUT bezeichnete Buchse des Kassettengerats. 


Zum Schlu8 stecken Sie das Ende des weifien Kabels in die mit EAR, COMPUTER 
OUT, oder OUTPUT bezeichnete Buchse des Kassettengerats. 
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Besonderer Hinweis: Eine einwandfreie Datenibertragung zwischen dem 
CPC6128 und der Kassette hangt im wesentlichen von der richtigen Einstellung 
der Lautstarke (VOLUME) ab. Wenn Sie den Eindruck haben, daf das Speichern 
oder Laden von Programmen nicht richtig funktioniert, experimentieren Sie mit 
dem Lautstarkeregler, bis Sie die optimale Einstellung gefunden haben. 


Der Drucker 


Der CPC6128 kann an jeden Drucker angeschlossen werden, der mit einer 
standardisierten Centronics-Schnittstelle ausgeristet ist. Wenn Sie einen 
Schneider Drucker anschlie8en wollen, verwenden Sie einfach das zugehérige 
Anschlu&kabel. 


Wenn Sie einen anderen Centronics-kompatiblen Drucker benutzen michten, 
brauchen Sie ein passendes Verbindungskabel fiir den Drucker. 


Stecken Sie den Platinenstecker des Verbindungskabels in die mit PRINTER 
bezeichnete Buchse an der Riickseite des Computers. 


Stecken Sie das andere Ende des Kabels mit der Centronics-Stecker in die 
Buchse an der Rtickseite des Druckers. Wenn die Buchse des Druckers mit 
Sicherheitsklammern versehen ist, driicken Sie diese in die Aussparungen des 
Steckers. 


Einzelheiten zum Betrieb des Druckers werden weiter hinten im Handbuch 
behandelt. 


Das zweite Diskettenlaufwerk (Schneider FD1) 


Das Schneider FD1 kann als zweites Diskettenlaufwerk an das System 
angeschlossen werden. Die Vorteile des doppelten Diskettenbetriebs werden 
besonders dem regelmaBigen CP/M Benutzer zugute kommen. Viele Programme 
sind so angelegt, da8 sich die Bibliotheksdiskette in einem Laufwerk befindet, 
wahrend mit den Dateien auf der Diskette im zweiten Laufwerk gearbeitet wird. 


Der Betrieb mit CP/M bedeutet immer, daB ein Programm von Diskette geladen 
werden mu8 (der Benutzer hat keinen Zugang zum ROM-BAGIC). Da CP/M durch 
eine spezielle Uberlagerungstechnik den Mehrprogrammbetrieb erméglicht, und 
Programme zulaBt, die gréBer sind als der RAM-Speicher, kann die eigentliche 
Bibliotheksdiskette so viele Programme enthalten, daf fiir die Daten wenig Platz 
bleibt. 


Dank der vielseitigen Méglichkeiten Ihrer CPC6128 System-Diskette kénnen Sie 
alle notwendigen Arbeiten an Ihren Dateien, wie kopieren, lischen usw., mit 
einem einzigen Diskettenlaufwerk bewaltigen. Mit einem  zweiten 
Diskettenlaufwerk kénnen Sie diese Vorgange jedoch beschleunigen und 
MiBgeschicke vermeiden. 
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Fur den Anschlu8 des FD1 bendtigen sie das Schneider DI2 Verbindungskabel fiir 
Diskettenlaufwerke. 


Stecken Sie das Kabelende mit dem gréBeren Platinenstecker in die mit DISC 
DRIVE 2 bezeichnete Buchse an der Riickseite des Computers. 


Stecken Sie das andere Ende mit dem kleineren Stecker in die Buchse hinten am 
FD1 Diskettenlaufwerk. 


Achtung! Bevor Sie das zweite Diskettenlaufwerk anschliefen bzw. abmontieren, 
vergewissern Sie sich, da} sich keine Diskette in den beiden Laufwerken befindet 
und dag das System abgeschaltet ist. Wenn Sie Gerdte anschlieBen oder 
entfernen, ohne das System vorher abzuschalten, besteht die Gefahr, daB das 
Programm im Computerspeicher beschadigt wird. Speichern Sie daher wertvolle 
Programme, bevor Sie mit den AnschluBkabeln herumhantieren! 


Wenn Sie das FD1 an den 6128 angeschlossen haben, schalten Sie ZUERST das 
Diskettenlaufwerk an (Schiebeschalter an der Riickseite des FD1), DANACH 
schalten Sie den Computer an (Schiebeschalter an der rechten Seite des 
Computers). Jetzt sollten das griine und das rote Lampchen an der Vorderseite 
des Diskettenlaufwerks leuchten. Das doppelte Diskettenlaufwerk ist somit 
betriebsbereit. 


Einzelheiten tiber den Betrieb mit zwei Diskettenlaufwerken finden sie weiter 
hinten im Handbuch. 


Externe Verstarker/Lautsprecher 


Wenn Sie an Ihren 6128 einen Stereo-Verstarker mit Lautsprechern anschliefen, 
kommen die 3-Kanal-Tonqualitaten des Computers voll zum tragen. 


An der Zuleitung Ihres Verstarkers sollte sich ein 3,5mm _ Stereo-Stecker 
befinden, den Sie in die mit STEREO bezeichnete Buchse des Computers stecken. 


Die Verbindungsstellen des Steckers sind folgende: 


Steckerspitze: Linker Kanal 
Innenring des Steckers: Rechter Kanal 
Hintere Steckerhiilse: Erde (gemeinsam) 


Der 6128 sendet ein Signal mit fester Spannung aus der STEREO-Buchse aus. 
Deshalb sollten Sie Lautstarke, Balance und Klang mit den Reglern am 
Verstarker einstellen. 


Kopfhérer mit hoher Impedanz kénnen ebenfalls an den 6128 angeschlossen 
werden, allerdings ist die Lautstarke nicht am Computer zu _ regulieren. 
Lautsprecher mit niedriger Impedanz, wie sie fiir Stereoanlagen verwendet 
werden, funktionieren nicht, wenn sie direkt an den Computer angeschlossen 
werden. 
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Einzelheiten dartiber, wie der Ton tiber den gewtinschten Kanal] ausgegeben wird, 
finden Sie weiter hinten im Handbuch. 


Erweiterungsgerate 


Krweiterungsgerate, wie Schnittstellen fiir serielle Dateniibertragung, Modems, 
Lichtgriffel, ROMs usw. kénnen mit dem 6128 wtber die Buchse mit der 
Bezeichnung EXPANSION verbunden werden. 


Weitere Einzelheiten uber Anschliisse an die EXPANSION-Buchse finden Sie im 
Kapitel ‘Ubersicht’. 


Zum Schlu& wtberpriifen Sie noch einmal, ob Sie folgende Punkte unter 
‘WICHTIGE HINWEISE’ am Beginn des Handbuches beachtet haben: 


‘Hinweise zur Inbetriebnahme’: Punkt 6 und 7 


‘Hinweise zum Betrieb’: Punkt 4 und 8 
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Teil 3: Disketten 


Fur den SCHNEIDER CPC6128 werden 3-Zoll Kompakt-Disketten verwendet. 
Wir méchten Ihnen dringend empfehlen, ausschlieBlich SCHNEIDER CF2 
Kompakt-Disketten zu verwenden, um eine zuverlassige Datenibertragung 
zwischen Computer und Diskette zu gewdhrleisten. Es kénnen aber auch 
Disketten fiihrender Hersteller verwendet werden. 


Einlegen der Diskette 


Die Disketten sind beidseitig verwendbar. Sie schieben die Diskette so in das 
Gerat, da das Etikett nach auBen weist und die Seite, die Sie benutzen méchten, 
oben liegt: 
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Schreibschutz 


Auf jeder Seite einer unbespielten Diskette sehen Sie in der linken Ecke einen 
Pfeil, der auf ein kleines verschlieSbares Loch weist. Dieses sogenannte 
Schreibschutzloch verhindert das Léschen und Uberschreiben der Diskette: 


Schreibschutzloch eee 
Neil as 
SY 


Wenn das Loch geschlossen ist, ksnnen Daten vom Computer auf die Diskette 
‘geschrieben’ werden. Ist das Loch jedoch geéffnet, wird die Diskette keine Daten 
aufnehmen, damit Sie nicht aus Versehen ein wertvolles Programm léschen. 


Die Diskettenhersteller haben unterschiedliche Mechanismen zum Offnen und 
SchlieBen des Schreibschutzlochs entwickelt. Beim SCHNEIDER CF2 
funktioniert er folgendermafen: 


Zum Offnen des Schreibschutzlochs schieben Sie den kleinen VerschluBriegel 
ber dem erwahnten Pfeil nach unten: 
A Schreibschutzloch 


Schreibschutzloch geéffnet geschlossen 
(Je oe : Verschlussriegel ([5 2  tst—~™t 
Verschluss-| | | | geschlossen 
riegel offen) ! | 
v = J 
| 
@) | o) 


ee 


Zum SchlieBen des Schreibschutzlochs schieben Sie den kleinen VerschluBriegel 
in Pfeilrichtung nach oben: 
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Bei einigen anderen Disketten befindet sich der Riegel iiber dem Loch in einem 
Schlitz an der Schmalseite des Diskettengehauses: 


Verschlussriegel 


Schreibschutzioch zu 


Um das Schreibschutzloch bei diesen Disketten zu 6ffnen, wird der Riegel mit 
einem spitzen Gegenstand zur Mitte der Diskette hingeschoben: 


Verschliussriegel Richtung 
Diskettenmitte 
schieben 


Schreibschutzloch 
offen 


Denken Sie daran, daB das Offnen des Schreibschutzloches in jedem Fall ein 


Uberschreiben der Diskette verhindert, gleichgiltig, welchen Mechanismus die 
Diskette aufweist. 


ACHTUNG! 


Achten Sie darauf, da8 die Schreibschutzlécher auf Ihren Systemdisketten immer 
gedffnet sind. 
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Wenn sich die Diskette im Laufwerk befindet 


Vorn am eingebauten Diskettenlaufwerk sehen Sie ein rotes Kontrollampchen 
und einen Druckknopf zum Auswerfen der Diskette 


Kontroll - ad Auswurfknopf 
Leuchte 


Das Kontrollampchen 


..zeigt an, da Daten von Diskette gelesen oder auf Diskette geschrieben werden. 


Wenn ein zweites Diskettenlaufwerk (Laufwerk B) angeschlossen ist, leuchtet 
dessen Kontrollampchen standig. Es erlischt, wenn Daten auf das eingebaute 
Diskettenlaufwerk (Laufwerk A) geschrieben, bzw. von ihm gelesen werden. 


Der Auswurfknopf 


..wird betatigt, um die Diskette herauszunehmen. 


Zum Schluf tberprifen sie noch einmal, ob Sie folgende Punkte unter 
‘WICHTIGE HINWEISE’ am Beginn des Handbuchs beachtet haben: 


‘Hinweise zum Betrieb’: Punkt 1, 3, 4, 5 und 6 
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Teil 4: Startvorbereitungen 


Bevor wir Ihnen erklaren, wie die Programme geladen bzw. auf Diskette 
gespeichert werden, méchten wir Sie noch mit der Funktion einiger Tasten 
vertraut machen. Falls Sie schon mit Computern gearbeitet haben, kénnen Sie 
diesen Abschnitt tiberspringen. 


Sie haben den Computer also eingeschaltet, sehen die ‘Einschalt’-Meldung auf 
dem Bildschirm und méchten nun wissen, was man mit den einzelnen Tasten 


anfangt. 


Rechts unten auf dem Tastenfeld sehen Sie die Cursor-Tasten...dao 

Mit ihnen 14%t sich der Cursor (der kleine kompakte Block auf dem Bildschirm) in 
die jeweilige Pfeilrichtung bewegen. Drticken Sie eine Cursor-Taste nach der 
anderen, und Sie sehen, wie der Cursor seine Positionen andert. 


- 


Die [RETURN]-Taste (return=zurick) dient dazu, die eingetippte Information dem 
Computerspeicher zu tibergeben. Wenn Sie die [RETURN]-Taste gedriickt haben, 
wird auf dem Bildschirm eine neue Zeile angefangen. Nach jeder Anweisung, die 
Sie eingetippt haben, miissen Sie die [RETURN]-Taste drticken. 


Bis auf weiteres schreiben wir im folgenden [RETURN] nach jeder Anweisung 
oder Programmzeile, um anzudeuten, dafi die [RETURN]-Taste gedriickt werden 
soll. 
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ENTER 


Die [ENTER]-Taste (enter=eingeben) hat unter Standardbedingungen dieselbe 
Funktion wie [RETURN] und kann genauso angewendet werden. Allerdings kann 
die [ENTER]-Taste ebenso wie die Funktionstasten auf der Zahlentastatur fiir 
andere Zwecke umdefiniert werden. Doch darauf gehen wir spater noch ein. 


DEL 


Mit der [DEL]-Taste (delete=léschen) kénnen Sie das Zeichen, das sich links vom 
Cursor befindet (z.B. eine Zahl oder einen Buchstaben), léschen, wenn Sie es nicht 
brauchen. 


Tippen Sie abcd ein, und Sie sehen, da sich der Buchstabe d jetzt links vom 
Cursor befindet. Wenn Ihnen das d itiberfliissig erscheint, driicken Sie die 
([DEL]-Taste, und schon ist es verschwunden. Wenn Sie [DEL] gedriickt halten, 
werden nacheinander auch die Buchstaben c,b und a geloscht. 


SHIFT 


Auf der Tastatur befinden sich zwei [SHIFT]-Tasten (Umschalttasten). Wenn Sie 
eine von beiden drticken und unten halten, wahrend Sie eine andere Taste 
anschlagen, erscheint ein GroBbuchstabe bzw. das obere Symbol der Taste auf 
dem Bildschirm. 


Schreiben Sie den Buchstaben e, driicken Sie dann die [SHIFT]-Taste und 
schlagen Sie die E-Taste nochmal an. Nun sehen Sie auf dem Bildschirm: 


eE 


Jetzt tippen Sie einige Leerstellen, indem Sie die Leertaste gedrtickt halten. 
Schreiben Sie die Ziffer 2 (auf der obersten Tastenreihe), dann driicken Sie die 
[SHIFT]-Taste und schlagen nochmal die Taste mit der 2 an. Nun sehen Sie auf 
dem Bildschirm: 
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au 


Sie wissen jetzt also, was geschieht, wenn [SHIFT] gedriickt ist und gleichzeitig 
eine andere Taste angeschlagen wird. Probieren Sie dies auch mit anderen Tasten 
aus. 


CAPS 
LOCK 


Die [CAPS LOCK]-Taste (Umschaltfeststeller) hat eine ahnliche Funktion wie 
[SHIFT], mit dem Unterschied, dafi sie nur einmal gedriickt wird. Ab dann 
erscheinen alle eingetippten Buchstaben auf dem Bildschirm als Gro&buchstaben. 
Wenn Sie die Zahlentasten driicken, erscheinen jedoch nicht die oberen Symbole. 


Driicken Sie einmal auf die [CAPS LOCK]-Taste und tippen Sie dann ein: 
abcdef123456 

Auf dem Bildschirm sehen Sie: 
ABCDEF123456 


Sie haben bemerkt, da die Buchstaben zwar in GroBschreibweise erscheinen, die 
Zahlen jedoch unverandert bleiben. Wenn Sie nun eines der tiber den Zahlen 
abgebildeten Symbole schreiben wollen, nachdem Sie [CAPS LOCK] gedritickt 
haben, driicken Sie einfach [SHIFT], bevor Sie die Taste mit dem Symbol 
anschlagen. Driicken Sie die [SHIFT]-Taste, wahrend Sie folgendes schreiben: 


abcdef 123456 
Auf dem Bildschirm erscheint: 
ABCDEF!"#$Z8& - 


Wenn Sie wieder kleine Buchstaben schreiben wollen, driicken Sie einfach noch 
einmal die [CAPS LOCK]-Taste. 


Wenn Sie Grofbuchstaben und Symbole schreiben méchten, ohne standig [SHIFT] 
driicken zu miissen, kénnen Sie folgendes tun: 


CONTROL fone 


Halten Sie die [CONTROL]-Taste gedrtickt und driicken Sie einmal [CAPS 
LOCK]. So erhalten Sie die sogenannte ‘SHIFT LOCK’-Funktion. Tippen Sie 
folgendes ein: 
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abcdef123456 
Auf dem Bildschirm erscheint: 
ABCDEF! "#$Z%& 


Wenn Sie die SHIFT LOCK-Funktion eingeschaltet haben, kénnen Sie dennoch 
Zahlen schreiben, indem sie die numerische Tastatur ({U bis f9) auf der rechten 
Seite des Tastenfeldes benutzen. 


Wenn Sie nochmals [CTRL] und [CAPS LOCK] driicken, kommen Sie wieder zu 
der Funktion zurtick, die Sie vorher eingestellt hatten, dh. entweder [CAPS 
LOCK] oder Kleinbuchstaben. Hatten Sie vorher [CAPS LOCK] gedriickt, driicken 
Sie einfach noch einmal [CAPS LOCK], um zur Kleinschreibweise 
zuruckzukehren. 


CLR 


Mit der [CLR]-Taste (clear=raumen) wird das Zeichen geléscht, auf dem sich der 
Cursor befindet. 


Tippen Sie ABCDEFGH ein. Der Cursor befindet sich jetzt rechts vom zuletzt 
eingegebenen Buchstaben (H). Driicken Sie nun _ viermal auf die 
Cursor-Links-Taste. Der Cursor hat sich nun vier Stellen nach links bewegt und 
liegt auf dem Buchstaben E. 


Beachten Sie, dafs das E noch innerhalb des Cursors sichtbar ist. Wenn Sie jetzt 
einmal [CLR] driicken, verschwindet das E, wahrend FGH jeweils eine Stelle nach 
links riicken. Der Cursor liegt nun auf dem F. Driicken Sie noch einmal [CLR] 
und halten Sie die Taste unten. Sie sehen, wie auch F, G und H nacheinander 
geloscht werden. 


ESC 


Die [ESC]-Taste (escape=ausbrechen) wird benutzt, um aus einer Funktion 
auszubrechen. Drticken Sie einmal [ESC], und der Computer unterbricht seine 
laufende Funktion. Er arbeitet jedoch weiter, sobald irgendeine andere Taste 
gedruckt wird. 


Zweimaliges Driicken der [ESC]-Taste bewirkt, da8 der Computer die Funktion, 
die er gerade ausiibt, véllig abbricht. Er wartet nun auf neue Anweisungen. 
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Wichtig 


Wenn Sie den rechten Bildschirmrand erreicht haben, nachdem Sie 40 Zeichen 
eingetippt haben, erscheint das nachste Zeichen auf der nachsten Zeile am linken 
Rand. Sie dirfen NICHT auf die [RETURN]-Taste driicken, wie Sie auf einer 
Schreibmaschine den Zeilenvorschub betatigen widen. 


Der Computer erledigt dies automatisch fiir Sie, und wird auf ein unerwartetes 
[RETURN] mit einer Fehlermeldung - normalerweise Syntax error - 
entweder sofort oder beim Programmablauf reagieren. 


Syntax Error 


Die Meldung ‘Syntax error’ erscheint auf dem Bildschirm, wenn der 
Computer nicht versteht, was Sie eingetippt haben. Schreiben Sie als Beispiel: 


printt [RETURN] 


Auf dem Bildschirm erscheint: 

Syntax error 
Der Computer gibt diese Meldung aus, weil er die Anweisung ‘printt’ nicht 
versteht. 


Wenn Sie einen Tippfehler in einer Programmzeile machen, z.B.: 
19 printt "abc" [RETURN] 


..erscheint die Meldung ‘Syntax error’ erst, wenn der Computer diese 
Anweisung verarbeitet, also dann, wenn das Programm lauft. 


Schreiben Sie: 
run [RETURN] 


(Dieser Befehl weist den Computer an, das Programm, das Sie gerade in seinen 
Speicher getippt haben, auszufiihren.) 
Nun erscheint folgendes auf dem Bildschirm: 


Syntax error in 10 
10 printt "abc" 


Die Meldung sagt Ihnen, in welcher Zeile der Fehler aufgetreten ist, und liefert 


Ihnen gleich die Programmzeile mit Korrektur-Cursor, so daB Sie den Fehler 
korrigieren koénnen. 
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Betatigen Sie die Cursor-Rechts-Taste, bis sich der Cursor tiber einem t in 
‘printt’ befindet. Driicken Sie [CLR], um das unerwiinschte t zu entfernen und 
geben Sie die korrigerte Zeile mit [RETURN] in den Computer ein. 


Nun schreiben Sie noch einmal: 
run [RETURN] 


..und sehen, da8 der Computer Ihre Anweisung diesmal verstanden und 
ausgefthrt hat. Auf dem Bildschirm erscheint: 


abc 


Zum Schlu8 tiberpriifen Sie noch einmal, ob Sie folgende Punkte unter 
‘WICHTIGE HINWEISE’ am Beginn des Handbuches beachtet haben: 


‘Hinweise zur Inbetriebnahme’: Punkt 4 und 5 
‘Hinweise zum Betrieb’: Punkt 1 
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Teil 5: Das Laden von 
Programmen und Spielen 


An dieser Stelle begriiBen wir wieder diejenigen Leser, die den vierten Teil 
uberspringen konnten. 


Um kurz zu demonstrieren, mit welcher Geschwindigkeit Diskettensoftware 
geladen werden kann, schalten Sie das Computersystem ein, und legen die Seite 4 
Ihres CP/M Systemdiskettensatzes ein. Legen Sie die Diskette so ein, daB die 
Seite 4 oben liegt. 


Tippen Sie: 
run "rointime.dem" [RETURN] 


Innerhalb von wenigen Sekunden wird das Programm in den Computerspeicher 
geladen. Sie werden jetzt gefragt, ob Sie einen Griinmonitor verwenden und 
miissen Y (yes) fiir ja und N (no) fiir nein eintippen. Nun wird Ihnen eine 
pausenlose Vorfiithrung des Spiels ‘Roland in time’ (Roland im Lauf der Zeiten) 
gezeigt. Vielleicht sind Sie so davon begeistert, daB Sie es sich gleich kaufen 
méchten! 


Wenn Sie sich das Vorfihrprogramm fertig angeschaut haben, kénnen Sie es 
abbrechen, indem Sie [CONTROL] und [SHIFT] driicken und unten halten, 
wahrend Sie die [ESC]-Taste driicken. Dadurch wird der Computer ganz 
zurtickgesetzt, d.h. in seinen Ausgangszustand versetzt. Diese drei Tasten kénnen 
Sie immer dann betatigen, wenn Sie von vorn beginnen méchten. (Um den 
Computer zuriickzusetzen, brauchen Sie vorher nicht die Disketten 
herauszunehmen.) 


Falls das Programm nicht geladen wurde, sehen Sie sich die Fehlermeldung auf 
dem Bildschirm an, um herauszufinden, was Sie falsch gemacht haben. Erscheint: 


Drive A: disc missing 
Retry, Ignore or Cancel? 


..S0 haben Sie entweder die Diskette nicht richtig hineingeschoben, oder Sie 
haben Sie in das Laufwerk B eingelegt, falls Sie mit zwei Diskettenlaufwerken 
arbeiten. 


ROINTIME.DEM not found 
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..bedeutet, da Sie entweder die falsche Diskette eingelegt haben, bzw. die 
falsche Seite oben liegt, oder da Sie den Namen des Programms, 
ROINTIME.DEM, nicht richtig geschrieben haben. 


Bad command 


..bedeutet wahrscheinlich, daB Sie ROINTIME.DEM nicht so wie angegeben 
geschrieben haben, sondern eine unerwiinschte Leerstelle oder ein falsches 
Satzzeichen eingebaut haben. 


Type mismatch 

..bedeutet, da Sie die Anfithrungszeichen ausgelassen haben. 
Syntax error 

..bedeutet, da3 das Wort ‘run’ falsch geschrieben wurde. 


Drive A: read fail 
Retry, Ignore or Cancel? 


.. bedeutet, dai der Computer die Daten auf Threr Diskette nicht lesen konnte. 
Uberpriifen Sie, ob Sie die richtige Diskette eingelegt haben und driicken Sie R 
fiir ‘Retry’ (‘neuer Versuch’). Diese Meldung wird immer dann erscheinen, wenn 
Ihre Diskette beschadigt wurde, weil sie sich noch im Laufwerk befand, als das 
Computersystem abgeschaltet wurde. 


Sobald Sie wissen, wie man Reservekopien von Disketten macht, versdumen Sie 
nicht, Ihre System-Disketten zu kopieren, und machen Sie immer eine Kopie von 
wertvollen Programmen. 


Wie die Schneider-Software geladen wird 


Nachdem wir Ihnen hoffentlich die unterhaltende Seite der Computerarbeit 
schmackhaft gemacht haben, wollen wir jetzt ein Spiel laden. 


Schieben Sie ihre Software-Diskette in das Laufwerk und tippen Sie: 

run "disc" [RETURN] 
Nach wenigen Sekunden ist Ihre Diskette geladen, und das Spiel kann beginnen. 
Versuchen Sie, die Seite 4 Ihres CP/M Systemdiskettenpakets mit dem Befehl 


run "disc" zu laden. Sie sehen und héren dann die endlose Vorfiihrung des 
Demonstrationsprogramms. 
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Wenn Sie sich genug angeschaut haben, setzen Sie den Computer mit Hilfe der 
[CONTROL]., [SHIFT]- und [ESC]-Tasten zuriick. 


Mit der Anweisung (run "disc"™) kénnen Sie die meisten Disketten der 
Schneider-Software laden, mit Ausnahme weniger Falle, in denen Sie etwas 
anderes eintippen miissen. Befolgen Sie deshalb immer die Ladeanweisung auf 
dem Etikett jeder Diskette. 


Zum Schlu8 tberpriifen Sie noch einmal, ob Sie folgende Punkte unter 
‘WICHTIGE HINWEISE’ am Beginn des Handbuches beachtet haben: 


‘Hinweise zur Inbetriebnahme’: Punkt 6 
‘Hinweise zum Betrieb’: Punkt 1, 5 und 6 
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Teil 6: Einfuhrung in 
SCHNEIDER BASIC 


Bis jetzt wissen Sie, wie man den Computer behandeln sollte, wie man ihn 
aufstellt und wie man das Zubehér anschlie8t. Sie kennen die Funktion einiger 
Tasten und kénnen die Software laden. Im folgenden Abschnitt machen wir Sie 
mit einigen Anweisungen bekannt, die Sie den Computer ausfithren lassen 
kénnen. 


Wie Sie und ich, kann der Computer nur Anweisungen in einer Sprache 
verstehen, die er kennt. Diese Computersprache hei8t BASIC (Abkirzung fir 
‘Beginners’ All-purpose Symbolic Instruction Code’). Die BASIC-Vokabeln werden 
Schlisselwérter genannt. Jedes Schltisselwort gibt dem Computer den Auftrag, 
eine bestimmte Funktion zu erfiillen. Alle Sprachen haben grammatische Regeln, 
und auch BASIC ist in dieser Hinsicht keine Ausnahme. Grammatik wird hier als 
‘Syntax’ bezeichnet. Der Computer sagt Ihnen freundlicherweise immer, wenn Sie 
einen Syntaxfehler (engl. Syntax error) gemacht haben. 


Die wichtigsten BASIC-Befehle 


Im 3. Kapitel finden Sie eine Zusammenstellung und Beschreibung aller Befehle 
des Schneider CPC6128 BASIC. In diesem Teil stellen wir Ihnen die 
gebrauchlichsten BASIC-Schlisselwérter vor. 


CLS 


(clear screen=Bildschirm léschen) 


Um den Bildschirm zu léschen, tippen Sie: 
cls [RETURN] 


Wie Sie sehen, verschwindet die Schrift vom Bildschirm und oben links erscheint 
das Wort Ready mit dem Cursor @. 


Beachten Sie, da& Sie die BASIC-Schliisselwérter sowohl in grofen als auch in 
kleinen Buchstaben eingeben kénnen. 
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PRINT 


(print=drucken) 


Diesen Befehl geben Sie immer dann ein, wenn Zeichen, Worte oder Zahlen auf 
dem Bildschirm erscheinen sollen. Schreiben Sie folgende Befehlszeile: 


print "hallo" [RETURN] 
Nun erscheint auf dem Bildschirm: 


hallo 

Die Anfithrungszeichen '"'' sagen dem Computer, was gedruckt werden soll. 
hallo wurde ausgegeben, sobald die [RETURN]-Taste gedriickt wurde. 
Schreiben Sie jetzt: 


cls [RETURN] 


..um den Bildschirm zu léschen. 


RUN 


(run=laufen) 


Das vorige Beispiel enthielt eine einzelne Befehlszeile. Sobald die 
[RETURN]-Taste gedriickt und der Befehl ausgefiihrt war, hatte der Computer 
den Befehl] vergessen. Man kann aber eine Reihe von Befehlen, die in einer 
bestimmten Reihenfolge ausgefiihrt werden sollen, speichern. Das heifSt, man 
schreibt ein Programm. Die BASIC-Anweisungen in einem Programm sehen aus 
wie im obigen Beispiel, mit dem Unterschied, da jede Befehlszeile mit einer 
Nummer versehen ist. Wenn das Programm aus mehr als einer Zeile besteht, 
sagen die Zeilennummern dem Computer, in welcher Reihenfolge die 
Anweisungen ausgefiihrt werden sollen. Mit [RETURN] wird die numerierte 
Programmzeile gespeichert, bis die darin enthaltene Anweisung ausgefihrt wird, 
d.h. bis das Programm lauft. Tippen Sie jetzt folgendes ein: 


18 print “hallo'" [RETURN] 
Sie haben bemerkt, daB diesmal nicht hallo auf dem Bildschirm erschien, als 
Sie die [RETURN]-Taste driickten. Stattdessen wurde der Befehl als einzeiliges 
Programm im Computer gespeichert. Um das Programm laufen zu lassen, 
brauchen Sie den Befehl run. Schreiben Sie: 


run [RETURN] 
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Jetzt erscheint das Wort hallo auf dem Bildschirm. 


Ubrigens kénnen Sie fiir das Wort print auch das ? Fragezeichen eintippen, also: 


10 ? "hallo" [RETURN] 


LIST 


(list=auflisten) 


Wenn sich ein Programm im Speicher befindet, kénnen Sie es tberpriifen, indem 
Sie es auflisten lassen. Schreiben Sie: 


List [RETURN] 
Auf dem Bildschirm erscheint jetzt Ihr Programm: 
10 PRINT "hallo" 


Wie Sie sehen, ist das Wort PRINT grofgeschrieben. Das heiBt, da der 
Computer PRINT als BASIC-Schlisselwort erkannt hat. 


Tippen Sie nun cls [RETURN] ein, um den Bildschirm frei zu machen. Obwohl 
Ihr Programm jetzt nicht mehr zu sehen ist, befindet es sich immer noch im 
Computerspeicher. 


GOTO 


(go to = gehe nach) 


Das Schliisselwort GOTO weist den Computer an, zu einer anderen Zeile zu 
springen, entweder, um einen Programmteil auszulassen, oder um eine 
sogenannte Schleife zu bilden. Schreiben Sie: 


19 print "hallo" [RETURN] 
28 goto 19 [RETURN] 


Jetzt schreiben Sie: 
run [RETURN] 
..und sehen, wie links lauter hal lo’s untereinander gedruckt werden. Das liegt 


daran, dais Zeile 2@ dem Computer sagt, zu Zeile 18 zuriickzukehren und das 
Programm von da ab durchzufiihren. 
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Um den Programmablauf zu stoppen, driicken Sie einmal auf die [ESC]-Taste. 
Wenn Sie jetzt eine beliebige andere Taste driicken, fahrt das Programm fort. 
Damit sie weitere Anweisungen eintippen kénnen, miissen Sie zweimal [ESC] 
driicken. 


Léschen Sie nun den Bildschirm mit: 
cls [RETURN] 


Wenn Sie méchten, da8 das Wort hal Lo jede Zeile auf dem Bildschirm ausfillt, 
tippen Sie das vorige Programm ein, und setzen dabei hinter das zweite 
Anfihrungszeichen ein ; Semikolon: 


1@ print "hallo"; [RETURN] 
28 goto 19 [RETURN] 
run [RETURN] 


Das Semikolon sagt dem Computer also, da8 die folgende Zeichengruppe direkt 
hinter die vorhergehende Zeichengruppe gesetzt werden soll, vorausgesetzt, daB 
sie noch in die Zeile paBt. 


Drticken Sie jetzt zweimal [ESC], um das Programm zu verlassen. Tippen Sie 
wieder Programmzeile 1@ ein, wobei Sie das Semikolon durch ein Komma 
ersetzen: 


18 print "hallo", [RETURN] 
run [RETURN] 


Das Komma bewirkt also, daB jede Zeichengruppe 13 Spalten hinter die 
vorangehende Zeichengruppe gesetzt wird. Diese Méglichkeit ist niitzlich, wenn 
man Informationen in einzelnen Spalten darstellen méchte. Geht die Anzahl der 
Zeichen in einer Gruppe jedoch tiber 12 hinaus, wird die folgende Zeichengruppe 
eine Spalte weiter gesetzt, so daB zwischen den Spalten stets ein Zwischenraum 
liegt. 

Die Breite der Spalten kann mit dem Befehl ZONE veradndert werden, der weiter 
hinten im Handbuch erklart wird. 


Verlassen Sie das Programm wieder, indem Sie zweimal [ESC] driicken. Um den 
Computerspeicher vollstandig zu léschen, driicken Sie der Reihe nach 
[CONTROL], [SHIFT] und [ESC] und halten diese Tasten, bis der Computer 
zuruckgesetzt ist. 


INPUT 


Mit diesem Befehl wird dem Computer mitgeteilt, dai er auf eine Information 
warten soll, z.B. auf die Antwort auf eine Frage. 
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Schreiben Sie: 


148 input “Wie alt bist du";Alter [RETURN] 

20 print “Du siehst juenger als";Alter;"Jahre 
aus." [RETURN] 

run [RETURN] 


Nun erscheint auf dem Bildschirm die Frage: 
Wie alt bist du? 


Geben Sie Ihr Alter ein und driicken Sie [RETURN]. Wenn Sie z.B. 18 eintippen, 
sagt Ihnen der Computer: 


Du siehst juenger als 18 Jahre aus. 


Das Beispiel zeigt Ihnen den Gebrauch des INPUT-Befehls und einer 
Zahlenvariable. Das Wort Alter am Ende der Zeile 18 speichert der Computer als 
Zahlenvariable, d.h. er assoziiert es mit jeder Zahl, die eingegeben wird, wenn das 
Programm lauft. Er setzt dann in Zeile 28 die eingegebene Zahl fir das Wort 
Alter ein. Wir haben als Variable das Wort Alter gewahlt; wir hatten ebensogut 
einen Buchstaben, z.B. 6, nehmen kénnen. 


Setzen Sie den Computer wieder mit [CONTROL], [SHIFT] und [ESC] zuriick, um 
den Speicher zu léschen. Wenn statt einer Zah] Buchstaben oder Buchstaben mit 
Zahlen eingegeben werden sollen, mu8 die Variable hinten mit einem 
Dollarzeichen $ versehen werden. Solch einen Variablentyp nennt man 
‘Stringvariable’. 


Tippen Sie nun das folgende Programm ein (wobei Sie darauf achten, daf in Zeile 
2@ nach dem o in hal Lo und vor dem 3 in i ch eine Leerstelle bleibt): 


1@ input "Wie heisst du";Name$ [RETURN] 
28 print “hallo ";Name$;" ich heisse Roland” [RETURN] 
run [RETURN] 

Der Computer fragt Sie jetzt: 


Wie heisst du? 


Tippen Sie [hren Namen ein und driicken Sie [RETURN]. 


Wenn Sie z.B. den Namen Fritz eingegeben haben, erscheint nun auf dem 
Bildschirm: 


Hallo Fritz ich heisse Roland 
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Wir haben in diesem Beispiel fiir die Stringvariable den Ausdruck Name$ 
gewahlt; wir hatten ebensogut einen Buchstaben mit $ , z.B. a$ nehmen konnen. 
Wir wollen jetzt die beiden obigen Beispiele in einem Programm kombinieren. 


Setzen Sie den Computer mit [CONTROL] [SHIFT] [ESC] zuritick und tippen Sie 
folgendes ein: 


5 cls [RETURN] 

10 input "Wie heisst du";a$ [RETURN] 

2@ input "Wie alt bist du";b [RETURN] 

3@ print "Ich muss sagen ";a$;" du siehst nicht wie";b; 
"Jahre aus" 

run [RETURN] 


Wir haben in diesem Programm zwei Variablen verwendet, a$ fiir den Namen 
und b fir das Alter. Der Computer fragt Sie jetzt: 


Wie heisst du? 


Sie tippen jetzt Ihren Namen ein (z.B. Fritz), und driicken [RETURN]. 


Nun werden Sie gefragt: 
Wie alt bist du? 


Sie geben Ihr Alter an (z.B. 18) und driicken [RETURN]. 


Wenn Sie Fritz heiRen und 18 sind, lesen Sie jetzt auf dem Bildschirm: 


Ich muss sagen Fritz du siehst nicht wie 18 Jahre aus 


Wie man ein Programm verandert 


Wenn Sie Fehler im Programm gemacht haben, und die Meldung syntax 
error oder eine andere Fehlermeldung auftaucht, brauchen Sie die fehlerhafte 
Zeile nicht neu zu schreiben, sondern kénnen sie korrigieren (editieren). Um dies 
zu demonstrieren, tippen Sie folgendes Programm mit den Fehlern ein: 


5 clss [RETURN] 

1@ input "Wie heisst du'";a$ [RETURN] 

26 input "Wie alt bis du";b [RETURN] 

3@ print "Ich muss sagen";a$;" du siehst 
nicht wie";b;"Jahre aus™ [RETURN] 


Das Programm weist drei Fehler auf: 
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In Zeile 5 haben wir cl ss statt c ls geschrieben. 

In Zeile 18 haben wir bis statt bist geschrieben. 

In Zeile 3@ haben wir eine Leerstelle zwischen sagen und den Anfithrungszeichen 
vergessen. 


Es gibt im wesentlichen drei Methoden, ein Programm zu korrigieren. Erstens 
kann die fehlerhafte Zeile neu geschrieben werden. Wenn Sie eine Zeile neu 
geschrieben und die [RETURN]-Taste gedrtickt haben, ersetzt diese Zeile die im 
Speicher vorhandene Zeile mit derselben Nummer. 


Zweitens gibt es die EDIT-Methode. 
Drittens gibt es die COPY-Cursor-Methode. 


Die EDIT-Methode 


Um den Fehler in Zeile 5 zu korrigieren, tippen Sie: 
edit 5 [RETURN] 


Nun erscheint Zeile 5 mit dem Cursor auf dem c in clss. 


Um das tberfltissige s in clss zu streichen, betatigen Sie die Cursor-Rechts-Taste, 
bis der Cursor auf dem letzten s liegt, und driicken die [CLR]-Taste. Schon ist das 
$ verschwunden. Wenn Sie jetzt [RETURN] dricken, wird die korrigierte Version 
gespeichert. Uberpriifen Sie mit: 


list [RETURN] 


..ob Zeile 5 nun richtig ist. 


Mit dem AUTO-Befehl, der spater noch erlautert wird, kénnen mehrere 
aufeinanderfolgende Zeilen nach der EDI T-Methode geandert werden. 


Die COPY-Cursor-Methode 


Der COPY-Cursor ist ein zweiter Cursor, der auf dem Bildschirm erscheint, wenn 
Sie [SHIFT] und gleichzeitig eine der vier Cursor-Tasten driicken. Er ]48t sich in 
alle vier Richtungen bewegen, wahrend der Haupt-Cursor an seinem Platz bleibt. 
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Um die Fehler in Zeile 1@ und 3@ zu berichtigen, driicken Sie die [SHIFT]-Taste 
und dann die Cursor-Oben-Taste, bis sich der COPY-Cursor am Anfang von Zeile 
1@ befindet. Sie sehen, da8 der Haupt-Cursor sich nicht bewegt hat, so da Sie 
nun zwei Cursor auf dem Bildschirm haben. Jetzt driicken Sie die 
{COPY]-Taste, bis der Cursor auf der Leerstelle zwischen bis und du steht. Sie 
werden bemerken, da8 Zeile 1@ unten noch einmal geschrieben wird, und da der 
Haupt-Cursor an der gleichen Stelle steht wie der COPY-Cursor. Jetzt tippen Sie 
das fehlende t ein. Es erscheint nur in der untersten Zeile. 


Der Haupt-Cursor hat sich bewegt, wahrend der COPY-Cursor an seinem Platz 
blieb. Driacken Sie jetzt die [COPY]-Taste, bis die gesamte Zeile kopiert ist. 
Sobald Sie [RETURN] driicken, wird die neue Zeile 1@ gespeichert. Der 
COPY-Cursor verschwindet und der Haupt-Cursor erscheint unter der neuen 
Zeile 18. Um den zweiten Fehler zu korrigieren, driicken Sie [SHIFT] und die 
Cursor-Oben-Taste, bis der COPY-Cursor am Anfang der Zeile 3@ steht. 


Driicken Sie [COPY], bis der COPY-Cursor auf dem Anfiihrungszeichen neben 
sagen steht. Schlagen Sie einmal die Leertaste an. In der untersten Zeile wird 
nun eine Leerstelle eingeschoben. Halten Sie die [COPY]-Taste solange unten, bis 
die gesamte Zeile 3@ kopiert ist, und driicken Sie [RETURN]. 


Um zu tiberpriifen, ob die korrigierte Version des Programms gespeichert wurde, 
kénnen das Programm auflisten lassen mit dem Befehl: 


List [RETURN] 
Hinweis: Um den Cursor beim Korrigieren schnell an den Anfang oder das Ende 


der Zeile zu bewegen, driicken Sie [CTRL] und einmal die Cursor-Links- bzw. 
Cursor-Rechts-Taste. 


Setzen Sie den Computer nun mit [CONTROL] [SHIFT] [ESC] zuriick. 


IF 


Mit IF (wenn) wird der Computer gefragt, ob eine bestimmte Bedingung vorliegt. 
Wenn ja, wird er mit THEN (dann) angewiesen, einen bestimmten Auftrag zu 
erfiillen. In der Befehlszeile: 


if 1+1=2 then print "richtig" [RETURN] 


z.B. wird der Computer priifen, ob 1+ 1=2 ist und dann entsprechend reagieren. 


Der Befehl ELSE kann zusammen mit IF und THEN verwendet werden, um dem 
Computer zu sagen, was er tun soll, wenn die Bedingung nicht erfiillt ist, z.B.: 


if 1+1=@ then print "richtig" else print "falsch" [RETURN] 
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Wir werden die Befehle I F und THEN jetzt in unser Programm einbauen. 


Beachten Sie dabei, dafi wir zwei neue Symbole eingefiihrt haben: < bedeutet 
kleiner als (neben der M-Taste) und > bedeutet gréRer als (neben der <-Taste). 
Schreiben Sie also: 


18 INPUT "Wie heisst du";a$ 

20 INPUT "Wie alt bist du";Alter 

30 IF Alter <13 THEN 66 

4Q@ IF Alter <2@ THEN 78 

5@ IF Alter >19 THEN 8@ 

60 PRINT "Na ";aS;", mit";Alter;"Jahren bist du noch k 
ein Teenager":END 

78 PRINT "So,so ";a$;", mit";Alter;"Jahren bist du ja 
ein Teenager":END 

88 PRINT "Na ";aS;", mit";Alter;"Jahren bist du kein T 
eenager mehr" 


Uberpriifen Sie, ob Sie das Programm richtig eingegeben haben, mit: 
List [RETURN] 

Jetzt tippen Sie: 
run [RETURN] 


Beantworten Sie die Fragen, die der Computer Ihnen stellt und warten Sie ab, 
was passiert. 


Sie haben also gesehen, was durch die Befehle IF und THEN im Programm 
bewirkt wird. Am Ende der Zeilen 68 und 7@ haben wir das Woértchen END 
angehangt. END ist ein Schltisselwort, mit dem das Programm beendet wird. 
Hatten wir es in Zeile 6@ ausgelassen, waren auch die Zeilen 7@ und 8@ 
ausgefiihrt worden. Und hatten wir es in Zeile 7@ ausgelassen, ware auch Zeile 
8@ ausgefihrt worden. 


Der Doppelpunkt : vor END trennt den Befehl von der vorangehenden 
Anweisung. Doppelpunkte werden verwendet, um zwei oder mehr Befehle in einer 
Programmzeile unterzubringen. AuBerdem haben wir das Programm um die Zeile 
5 erganzt, um den Bildschirm am Anfang des Programms frei zu machen. Wir 
werden dies von jetzt an in den folgenden Programmen immer tun, damit unsere 
Arbeit sauberer aussieht. 


Setzen Sie den Computer mit [CONTROL] [SHIFT] [ESC] zuriick. 
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FOR und NEXT 


(for...to = fiir...bis; next=ndachstes) 


Die Befehle FOR und NEXT werden verwendet, wenn man eine bestimmte 
Operation mehrere Male durchfiihren lassen will. Die Anweisungen fir diese 
Operation werden in eine FOR NEXT-Schleife eingeschlossen. 


Schreiben Sie: 


5 cls 

10 for a=1 to 18 [RETURN] 

26 print "Operationsnummer";a [RETURN] 
36 next a [RETURN] 

run [RETURN] 


Sie sehen, daB die Anweisung in Zeile 2@ zehnmal durchgefiihrt wurde, wie im 
FOR-Befeh] in Zeile 1@ angegeben. Der Wert der Variablen wurde dabei 
jedesmal um 1 erhéht. 


Mit dem Schliisselwort STEP (Schritt) kénnen Sie bestimmen, um welchen Wert 
die Variable in der FOR NEXT-Anweisung bei jedem Durchgang erhéht werden 
soll. Andern Sie z.B. Zeile 18 um in: 


16 for a=18 to 5@ step 5 [RETURN] 
run [RETURN] 


Sie kénnen Rtickwartsschritte machen, z.B.: 


18 for a=19@ to @® step -19 [RETURN] 
run {RETURN] 


REM 


REM ist die Abkiirzung fir das englische Wort ‘remark’ (= Anmerkung). Alles, 
was hinter diesem Schliisselwort in derselben Zeile steht, wird vom Computer 
ignoriert und stellt nur eine Gedachtnisstiitze fir Sie dar. Es kann sich z.B. um 
einen Programmtitel oder um die Bedeutung einer Variablen handeln: 


16 REM Zap the invaders [RETURN] 
2@ L=5 :REM Anzahl der Menschenleben [RETURN] 
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Statt :REM kénnen Sie auch ein einfaches Anfithrungszeichen ' (drticken Sie 
[SHIFT] und die 7-Taste) einsetzen: 


10 ‘Zap the invaders [RETURN] 
20 L=5 'Anzahl der Menschenleben [RETURN] 


GOSUB 


(go subroutine = gehe zum Unterprogramm) 


Wenn Sie ein Programm schreiben, in dem eine oder mehrere Anweisungen 6ofter 
durchgefiihrt werden sollen, brauchen Sie die entsprechenden Zeilen nicht an all 
diesen Stellen im Programm einzutippen. Stattdessen kénnen Sie die 
Anweisungen zu einem Unterprogramm (auch Subroutine  genannt) 
zusammenfassen, das bei Bedarf mit dem Befehl GOSUB, gefolgt von der ersten 
Zeilennummer des Unterprogramms, aufgerufen wird. Das Ende des 
Unterprogramms wird durch den Befehl RETURN gekennzeichnet. An diesem 
Punkt angelangt, wird der Computer zu der Anweisung zuriickkehren, die dem 
Aufruf des gerade absolvierten Unterprogramms folgt. 


Die folgenden beiden Programme sollen Ihnen die Funktion des GOSUB-Befehls 
verdeutlichen. Da in diesen Programmen nichts weiter ‘passiert’, sondern 
lediglich ein Text auf den Bildschirm geschrieben wird, brauchen Sie sich nicht 
die Miihe zu machen, sie einzutippen: 


10 MODE 2 [RETURN] 

20 PRINT "This old man he played one" [RETURN] 

3@ PRINT "He played knick-knack on my drum" [RETURN] 
4@ PRINT "With a knick-knack paddy wack” [RETURN] 
5@ PRINT "Give a dog a bone" [RETURN] 

68 PRINT "This old man came rolling home" [RETURN] 
78 PRINT [RETURN] 

8@ PRINT "This old man he played two" [RETURN] 

9@ PRINT "He played knick-knack on my shoe" [RETURN] 
106 PRINT “With a knick-knack paddy wack" [RETURN] 
11@ PRINT "Give a dog a bone" [RETURN] 

120 PRINT "This old man came rolling home" [RETURN) 
138 PRINT [RETURN] 

14@ PRINT "This old man he played three” [RETURN] 
15@ PRINT "He played knick-knack on my knee" [RETURN] 
180 PRINT "With a knick-knack paddy wack" [RETURN] 
198 PRINT "Give a dog a bone" [RETURN] 

208 PRINT "This old man came rolling home" [RETURN] 
218 PRINT [RETURN] 

run [RETURN] 
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Sie sehen, da in diesem Programm drei Zeilen mehrere Male, z.B. zwischen Zeile 
180 und 200, wiederholt werden. Diesen Refrain kénnen wir zu einem 
Unterprogramm machen, das wir mit dem Befehl RETURN abschlieBen. Das 
Unterprogramm kénnen wir nun mit der Anweisung GOSUB 18@ jederzeit (am 
Ende jeder Strophe) aufrufen. Dann sieht das Programm so aus: 


1@ MODE 2 [RETURN] 

20 PRINT "This old man he played one" [RETURN] 

3@ PRINT "He played knick-knack on my drum" [RETURN] 
40 GOSUB 18@ [RETURN] 

8@ PRINT "This old man he played two" [RETURN] 

9@ PRINT "He played knick-knack on my shoe" [RETURN] 
188 GOSUB 188 [RETURN] 

148 PRINT "This old man he played three" [RETURN] 
15@ PRINT "He played knick-knack on my knee" [RETURN] 
168 GOSUB 18@ [RETURN] 

17@ END [RETURN] 

180 PRINT "With a knick-knack paddy wack" [RETURN] 
198 PRINT "Give a dog a bone" [RETURN] 

206 PRINT "This old man came rolling home" [RETURN] 
210 PRINT [RETURN] 

220 RETURN [RETURN] 

run [RETURN] 


Sehen Sie, wieviel mihevolle Schreibarbeit wir uns dadurch hatten sparen 
kénnen? In einem  wohlstrukturierten Programm sind Unterprogramme 
unerlaBlich. Sie gehéren zu einem guten Programmierstil. 


Wenn Sie Unterprogramme schreiben, denken Sie daran, da Sie nicht unbedingt 
jedes Mal dieselbe Stelle des Unterprogramms aufrufen miissen, d.h. seine erste 
Zeile. Ein Unterprogramm zwischen Zeile 5@@ und 80@ kann z.B. mit folgenden 
Anweisungen aufgerufen werden: GOSUB 5@9@, oder GOSUB 640, oder GOSUB 
790. 


Beachten Sie im obigen Programm den Befehl END in Zeile 17@. Wirde er 
fehlen, so wiirde das Programm nach Zeile 16@ weiterlaufen und die Anweisung 
in Zeile 18@ ausfiihren. Dies ist jedoch nur wiinschenswert, wenn die Zeile mit 
einem GOSUB-Befehl aufgerufen wird. 
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Einfache Arithmetik 


Ihr Computer kann sehr einfach als Rechner eingesetzt werden. Die folgenden 
Beispiele erlautern das ndher. Wir verwenden in diesem Abschnitt das 
Fragezeichen fiir den Befeh] PRINT. Das Ergebnis erscheint auf dem Bildschirm, 
sobald die [RETURN]-Taste gedriickt wird. 


Addition 
(driicken Sie fiir ‘plus’ die [SHIFT]- und ; Tasten) 
Tippen Sie: 


2?3+3 [RETURN] 
6 


(Das Gleichheitszeichen = wird NICHT eingegeben) 
Tippen Sie: 


28+4 [RETURN] 
12 


Subtraktion 
(driicken Sie fiir ‘minus’ die = Taste ohne [SHIFT]) 
Tippen Sie: 


24-3 [RETURN] 
1 


Tippen Sie: 


28-4 [RETURN] 
4 


Multiplikation 


Benutzen Sie das Sternchen * als Multiplikationszeichen. (: Taste mit [SHIFT]) 
Tippen Sie: 


273%*3 [RETURN] 
9 
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Tippen Sie: 


28%4 [RETURN] 
32 


Division 
Benutzen Sie den Schragstrich / als Divisionszeichen. (? Taste ohne [SHIFT]) 


Tippen Sie: 
23/3 [RETURN] 
1 


Tippen Sie: 
28/4 [RETURN] 
2 


Ganzzahlige Division 
Benutzen Sie diesen Schragstrich \ fiir die Division ohne Rest. 
Tippen Sie: 


21@\6 [RETURN] 
1 


Tippen Sie: 


220\3 [RETURN] 
6 


Modulo 


Modulo nennt man den Rest, der nach einer ganzzahligen Division bleibt. 
Benutzen Sie MOD, um die Restzah] zu erhalten. 
Tippen Sie: 


218 MOD 4 [RETURN] 
2 


Tippen Sie: 


29 MOD 3 [RETURN] 
6B 
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Quadratwurzel 


Benutzen Sie sqr(), um die Quadratwurzel zu erhalten. Die Zahl, aus der die 
Wurzel gezogen werden soll, mu in Klammern stehen. 


Tippen Sie: 


2sqr(16) [RETURN] (Dies bedeutet V16) 
4 


Tippen Sie: 


2?sqr (1088) [RETURN] 
10 


Potenzen 


Potenzieren nennt man die Rechnungsart, bei der eine Zahl so oft mit sich selbst 
multipliziert wird, wie der Exponent (die Hochzahl) angibt. 


Benutzen Sie den Pfeil 1 zum Potenzieren. ( } Taste ohne [SHIFT]) 
Tippen Sie: 


2313 [RETURN] (Dies bedeutet 3°) 
27 


Tippen Sie: 


2814 [RETURN] (Dies bedeutet 8*) 
4896 


Kubikwurzel 


Zum Berechnen der Kubikwurzel verwenden Sie eine Ahnliche Methode wie beim 
Potenzieren. 


Um die Kubikwurzel von 27 (327) zu finden, tippen Sie: 
2271 (1/3) [RETURN] 
3 


Tippen Sie: 


21257 (1/3) [RETURN] 
5 
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Gemischte Rechenoperationen 
Der Computer fiihrt auch gemischte Rechenoperationen durch, jedoch miissen 
bestimmte Prioritaten beachtet werden. 


Hoéchste Prioritat hat die Multiplikation, danach folgen Division, Addition und 
Subtraktion. Diese Prioritatenliste gilt jedoch nur, solange es sich ausschlieBlich 
um diese vier Rechenarten handelt. 


Nehmen wir folgende Aufgabe: 
3+7-2%7/4 
Vielleicht denken Sie, da sie so gerechnet wird: 
+7-2 *7 /4 
8 *7 /4 


56 /4 
14 


tf oul oth Ww 


Doch der Computer rechnet folgendermaBen: 


3+7-2%*7/4 
=3+7-14/4 
=3+7-3.5 
=10-3.5 
=6.5 


Uberpriifen Sie dies, indem Sie die Aufgabe wie oben angegeben eintippen: 


23+7-2*7/4 [RETURN] 
6.5 


Die Reihenfolge der Berechnung kann veradndert werden, wenn Sie Klammern 
verwenden. Der Ausdruck in Klammern hat Vorrang vor der Multiplikation und 
den anderen Rechenarten auBerhalb der Klammern. Uberzeugen Sie sich, indem 
Sie die Aufgabe so schreiben: 


2(3+7-2)*7/4 [RETURN] 
14 
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Die Prioritatenliste aller mathematischen Operatoren ist: 


t Potenzierung 

MOD Modulo 

7 unares Minus (es bezeichnet eine Zahl als negativ) 
* und / Multiplikation und Division 

\ ganzzahlige Division 


+ und - Addition und Subtraktion 


Andere Exponenten 


Falls Sie mit sehr groBen oder sehr kleinen Zahlen rechnen, ist eine andere 
Schreibweise vorteilhafter. Der Buchstabe E wird als Potenz zur Basis 10 
verstanden. Es ist hier gleichgiiltig, ob sie ein grofes E oder ein kleines e 
schreiben. 


Die Zahl 300 z.B. kann auch als 3x10?  geschrieben werden. In der 
wissenschaftlichen Schreibweise hei®t es 3£2. Ahnlich verhalt es sich mit 0.03 
(auch 3x10): Die wissenschaftliche Schreibweise ist 3E-2. Probieren Sie 
folgende Beispiele aus: 


Sie kénnen eintippen: 


230*16 [RETURN] 
300 


..oder Sie kénnen eintippen: 


23E1*1E1 [RETURN] 
300 


273060*100@ [RETURN] ... oder: ?3E3*1E3 [RETURN] 
3600000 


2?3000*0.001 [RETURN] ... oder: ?363*3E-3 [RETURN] 
3 
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Teil 7: Speichern 


Nachdem Sie nun mit dem Eintippen einiger Befehle die ersten Fingeriibungen 
absolviert haben, méchten Sie wahrscheinlich wissen, wie man ein Programm auf 
Diskette speichert, und wie man es von der Diskette wieder in den Computer ladt. 


Auch wenn Sie das Speichern und Laden schon vom Kassettenbetrieb her kennen, 
sollten Sie einige wichtige Besonderheiten beachten, bevor Sie Programme auf 
Diskette abspeichern. 


Es gibt zwei wesentliche Unterschiede zwischen dem Diskettenbetrieb und 
Kassettenbetrieb. Erstens kann man eine neue, unbespielte Diskette nicht 
einfach auspacken und bespielen wie eine Kassette. Eine neue Diskette muf erst 
‘formatiert’ werden, was wir gleich naher erlautern werden. 


Zweitens miissen Disketten-Dateien korrekt benannt werden. Es gibt nicht viele 
Regeln fir die Benennung von Dateien, die auf Kassette gespeichert werden; die 
Dateinamen kénnen sehr verschieden lang sein oder auch ausgelassen werden. 
Nicht so bei Disketten-Dateien. Dateinamen fiir die Diskettenspeicherung 
mussen genau der CP/M Norm entsprechen, wie wir noch weiter ausfiihren 
werden. 


Was heiBt formatieren? 
Bevor Sie irgendwelche Daten auf eine neue, unbespielte Diskette schreiben, mu 
die Diskette formatiert werden. 


Sie kénnen sich das so vorstellen, da8 die Diskette erst mit einem Regalsystem 
ausgestattet werden mu, auf denen die Information dann abgelegt werden kann. 
Mit anderen Worten, die Diskette muf erst in systematische Teile gegliedert 
werden, denen die Daten dann zugeordnet werden kénnen. 


Beim Formatieren wird die Diskette in 360 Teile gegliedert: 
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Spur 39 


Gehause 


Sektor 
Spur 0 


Die Diskette hat ahnlich wie eine Schallplatte 40 Spuren, von Spur 0 (ganz 
auen) bis Spur 39 (ganz innen), auSerdem wird sie wie ein Kuchen in 9 Sektoren 
eingeteilt. 


Jede Spur eines Sektors kann 512 Bytes Daten speichern. Insgesamt betragt der 
Speicherplatz pro Diskettenseite also 180 KBytes. 


Das Formatieren mit den CP/M Systemdisketten 


Um also eine neue, unbespielte Diskette gebrauchsfertig zu machen, mtssen Sie 
sie formatieren. Dazu verwenden Sie die Seite 1 Ihres Systemdiskettensatzes, der 
Thnen beim Kauf des Computers tibergeben wurde. 


Schalten Sie das Computersystem an und schieben Sie die Seite 1 Ihres 
Systemdiskettensatzes in das Laufwerk. 


Wenn Sie mit zwei Diskettenlaufwerken arbeiten, schieben Sie Seite 1 immer in 
das eingebaute Hauptlaufwerk (Laufwerk A). 


Tippen Sie: 
Icpm [RETURN] 


(Den Balken | finden Sie, indem Sie [SHIFT] und die @ Taste driicken.) 


Nach wenigen Sekunden erscheint auf dem Bildschirm folgende Meldung: 


CP/M Plus Amstrad Comsumer Electronics plc 
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Diese Meldung sagt Ihnen, da der Computer jetzt unter der Kontrolle des CP/M 
Plus -Betriebssystems steht. AuBerdem sehen Sie den Buchstaben A> mit dem 
Cursor. Dies ist ein ‘Bereitschaftszeichen’, ahnlich wie Ready beim normalen 
BASIC-Betrieb. Es sagt Ihnen, da der Computer auf weitere Anweisungen von 
Thnen wartet. 


Wenn Sie mit CP/M arbeiten, kénnen Sie dem Computer keine BASIC-Befehle 
geben, weil er sie dann nicht versteht. 


Wenn Sie z.B:: 
cls [RETURN] 


..eintippen, wird der Computer Ihren Befehl mit einem Fragezeichen 
wiederholen: 


CLS? 


..um Ihnen kund zu tun, da er diesen Befehl nicht versteht. 


Sehen wir uns also einige CP/M-Befehle an. Schreiben Sie: 
dir [RETURN] 


Auf dem Bildschirm sehen Sie jetzt ein Inhaltsverzeichnis (directory) mit den 
Dienstprogrammen (utility COMmands) von CP/M. Eines davon heift 
DISCKIT3. Schreiben Sie: 


disckit3 [RETURN] 


Nach wenigen Augenblicken sehen Sie oben auf dem Bildschirm die DISC KIT 
Eroffnungsmeldung, gefolgt von: 


One drive found 


Dies bedeutet, daB Sie das DISC KIT- Dienstprogramm laufen haben, und daB Sie 
nur ein Diskettenlaufwerk - das eingebaute - in Betrieb haben. 


Haben Sie ein zusatzliches Diskettenlaufwerk angeschlossen, so lautet die 
Meldung: 


Two drives found 
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Weiter unten auf dem Bildschirm sehen Sie folgendes Bild: 


Copy 
Format 
Verify 


Exit from program 


Dies ist das sogenannte DISC KIT Hauptment. Die Nummern im Kasten 
beziehen sich auf die Funktionstasten rechts auf der Tastatur (f0, f1, f4 und f7). 
Wenn Sie eine dieser Tasten driicken, wird die zugehérige Anweisung ausgefithrt. 


Wenn Sie zu diesem Zeitpunkt Taste f@ driicken, verlassen Sie das DISC 
KIT-Programm und landen wieder beim Direktmodus der CP/M Bedienkonsole, 
dem Bereitschaftszeichen A>. 


Wir méchten die Diskette formatieren und miissen daher Taste f4 driicken. 


ACHTUNG! 


Das Formatieren beschriebener Disketten loscht threnInhalt. 


Nun erscheint ein neues Menti, das verschiedene Formate zur Auswahl anbietet: 


System format Fe 
Data format eal 
Vendor format 
Exit menu el 


Sie driicken auf die entsprechende Taste (f3, f6 oder f9) fiir das gewiinschte 
Format. Die verschiedenen Formate werden weiter hinten im Handbuch erklart. 
Wir wahlen vorlaufig das Data-Format, indem wir die Taste f6 driicken. 


Wenn Sie an dieser Stelle die . Taste driicken, verlassen Sie den Format-Modus 
und kehren zum DISC KIT-Menii zuriick. 
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Haben Sie also die Taste f6 gedriickt, erscheint - vorausgesetzt, Sie haben kein 
zusatzliches Diskettenlaufwerk angeschlossen - folgende Meldung auf dem 
Bildschirm: 


Format as Data 


Any other key to exit menu 


Jetzt miissen Sie die CP/M Systemdiskette herausnehmen und die Diskette 
einlegen, die Sie formatieren wollen. Die Seite, die formatiert werden soll, mu8 
oben liegen. 


Jetzt driicken Sie die Y-Taste (Y steht fiir ja, die Diskette soll formatiert 
werden’.) 


Die Diskette wird von Spur 0 bis Spur 39 formatiert, wobei oben links auf dem 
Bildschirm die Nummer der Spur angezeigt wird, die gerade bearbeitet wird. 


Disketten mit offenem Schreibschutzloch kénnen nicht formatiert werden. Falls 
Sie das versuchen, erscheint folgende Meldung: 


Disc write-protected 
Insert disc to format 
R-etry or C-ancel 


Daraufhin sollten Sie Ihre Anweisung zurticknehmen, indem Sie C fur Cancel 
eintippen. Dann legen Sie die richtige Diskette mit geschlossenem 
Schreibschutzloch zum Formatieren ein. 


Sorgen Sie dafiir, da das Schreibschutzloch von Disketten mit Programmen, die 
Sie behalten wollen, immer offen ist, und schlieBen Sie NIEMALS die 
Schreibschutzlécher Ihrer CP/M-Systemdisketten! 


Nach Beendigung des Formatierens sehen Sie folgende Mitteilung: 
Format completed 


Remove disc 
Press any key to continue 


Sie sagt Ihnen, da das Formatieren beendet ist und Sie die Diskette 
herausnehmen sollen. Danach miissen Sie irgendeine Taste driicken. 


Wenn Sie moéchten, kénnen Sie nun eine andere Diskette zum Formatieren 
einlegen und wieder Y driicken. Sie kénnen den Vorgang beliebig oft wiederholen, 
bis Sie alle Disketten formatiert haben, die dieses Format erhalten sollen. 


Sind Sie mit dem Formatieren fertig, driicken Sie irgendeine Taste (auBer Y) und 
kehren zum DISC KIT-Haupt-Meni zuriick. 
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Die beiden anderen Wahlmdglichkeiten des Meniis, Copy und Verify, werden 
wir spdter besprechen. Fiir’s erste reicht es, was Sie jetzt tiber das Formatieren 
gelernt haben. Setzen Sie den Computer nun mit [CONTROL] [SHIFT] [ESC] 
zurtick. 


Bewahren Sie Ihre CP/M-Systemdisketten immer an einem sicheren Ort auf, 
denn sie sind im wahrsten Sinne des Wortes der Schltissel zu Ihrem System. 
Weiter hinten im Handbuch sagen wir Ihnen, wie Sie ‘Arbeitskopien’ von Ihren 
Systemdisketten machen kénnen, so dai Sie Original-Systemdisketten gut 
wegschliefen kénnen. 


Formatieren auf einem 
Disketten-Doppellaufwerk 
Gehen Sie wie oben beschrieben vor: Wahlen Sie Format aus Ihrem DISC 


KIT-Menii, indem Sie die Taste f4 driicken, und wahlen Sie anschlieBend Data 
format, indem Sie Taste f6 driicken. 


An dieser Stelle wird Ihnen ein drittes Ment gezeigt, das Ihnen die beiden 
Laufwerke, auf denen Sie formatieren kénnen, zur Auswahl anbietet: 


Format A: 
Format B: 


Exit menu 


Wenn Sie sich fir Format B: (Taste f5) entscheiden, kénnen Sie Ihre 
Systemdiskette (Seite 1) im Laufwerk A lassen, wahrend Sie die Diskette, die Sie 
formatieren wollen, ins Laufwerk B einlegen. 


Nachdem Sie also Taste f5 gedriickt haben, kénnen Sie entweder Y driicken, um 
den Formatiervorgang einzuleiten, oder eine andere Taste anschlagen, um zum 
DISC KIT-Menii zurtickzukehren. 


Haben Sie Format A: (Taste f8) gewahlt, missen Sie UNBEDINGT daran 
denken, Ihre Systemdiskette aus dem Laufwerk A herauszunehmen, und dafir 
die Diskette einzulegen, die formatiert werden soll. 


Denken Sie daran: GEHEN SIE NIEMALS DAS RISIKO EIN, IHRE CP/M 
SYSTEMDISKETTEN ZU UBERSCHREIBEN! 


Wir haben jetzt also eine formatierte, unbeschriebene Diskette (oder zwei), auf die 
wir BASIC-Programme iibertragen kénnen, um sie spater wieder abzurufen. 
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Speichern von Programmen auf Diskette 


Wenn Sie ein Programm in den Computerspeicher geschrieben haben, kénnen Sie 
es auf Diskette speichern mit dem Befehl: 


save "datei" [RETURN] 


Beachten Sie, daB das Programm benannt werden muf. 


Der Dateiname fiir die Diskettenspeicherung besteht aus zwei Teilen (Feldern). 
Im ersten Feld mu8 eine Bezeichnung eingetragen werden, die aus bis zu acht 
Buchstaben und/oder Ziffern bestehen kann. Es dirfen keine Leerstellen oder 
Satzzeichen darin vorkommen. Das erste Feld enthalt gewéhnlich den Namen des 
Programms. 


Es steht Ihnen frei, im zweiten Feld etwas einzutragen. Die Bezeichnung im 
zweiten Feld kann aus drei Buchstaben und/oder Ziffern bestehen, wiederum ohne 
Leerstellen oder Satzzeichen. Die beiden Felder werden durch einen Punkt . 
getrennt. 


Wenn Sie im zweiten Feld nichts angeben, wird das System automatisch seine 
eigene Bezeichnung einsetzen, z.B. .BAS fiir BASIC-Datei oder .BIN fir 
Binar-(Maschinencode-) Datei. 


Um auszuprobieren, wie etwas auf Diskette gespeichert wird, schreiben Sie ein 
kurzes Programm, legen eine formatierte Diskette ins Diskettenlaufwerk und 
tippen: 


save "Beispiel" [RETURN] 
Nach wenigen Sekunden erscheint die Bereitschaftsmeldung Ready auf dem 
Bildschirm, d.h. das Programm ist auf Diskette gespeichert worden. (Wenn nicht, 
sehen Sie sich die Fehlermeldung auf dem Bildschirm an, um festzustellen, ob Sie 
vielleicht die Diskette nicht in das richtige Laufwerk geschoben haben, oder ob 


Sie vergessen haben, das Schreibschutzloch zu schlieBen, oder ob Sie den Befehl 
fehlerhaft eingetippt haben.) 


Das Inhaltsverzeichnis 


Nachdem Sie das Programm gespeichert haben, kénnen Sie sich das 
Inhaltsverzeichnis (catalog) der Diskette ansehen, indem Sie eintippen: 


cat [RETURN] 
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Auf dem Bildschirm erscheint jetzt der Name der Datei, einschlieBlich der 
naheren Bezeichnung im zweiten Feld. AuBerdem wird die Lange der Datei (zum 
nachsthéheren K-Byte aufgerundet) und der Umfang des verbliebenen 
Speicherplatzes auf der Diskette angezeigt: 

Drive A: user @ 

BEISPIEL.BAS 1K 


177K free 


Laden von Diskette 


Programme k6nnen mit folgenden Befehlen von Diskette geladen und 
anschlieBend gestartet werden: 


Load "programm" [RETURN] 
run [RETURN] 


..oder sie konnen direkt gestartet werden mit: 
run "programm" [RETURN] 


Hinweis: Geschiitzte Programme kénnen nur direkt gestartet werden. 


[A UND |B 


Wenn Sie mit einem zusatzlichen Diskettenlaufwerk arbeiten, kénnen Sie 
bestimmen, welches Laufwerk (A oder B) Sie ansprechen, indem Sie den Befehlen 
SAVE, CAT oder LOAD 


la [RETURN] 
oder 

Ib [RETURN] 
voranstellen. 
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Kopieren von Programmen von Diskette auf 
Diskette 


Mit den in diesem Abschnitt vorgestellten Befehlen la8t sich ein Programm 
mihelos von einer Diskette auf eine andere kopieren. Das Programm wird von 
der Originaldiskette in den Computerspeicher geladen, danach wird die 
Originaldiskette herausgenommen und das Programm vom Speicher auf die neue 
Diskette geschrieben. 


Wenn Sie zwei Diskettenlaufwerke betreiben, um ein Programm von einer 
Diskette auf die andere zu kopieren, kénnen Sie die Originaldiskette z.B. in das 
Laufwerk B, und die Kopierdiskette in das Laufwerk A einlegen. Dann schreiben 
Sie: 


Ib [RETURN] 
load "programm" [RETURN] 
la [RETURN] 
save "programm" [RETURN] 


Mit dem CPC6128 kénnen Dateien auf vier verschiedene Arten gespeichert 
werden. Neben dem gewohnlichen Speicherverfahren von BASIC-Dateien mit: 


save "programm" [RETURN] 


.. haben Sie drei weitere Methoden fiir spezielle Zwecke zur Verfiigung: 


ASCII Dateien 


save "programm",a [RETURN] 


Der nachgestellte Ausdruck ,a weist den Computer an, die Datei in Form einer 
ASCH Textdatei zu speichern. Diese Art der Datenspeicherung wird 
normalerweise in der Textverarbeitung und bei anderen Anwenderprogrammen 
benutzt. Eine detaillierte Beschreibung folgt, wenn diese Programme erklart 
werden. 


Geschiitzte Dateien 
save "programm",p [RETURN] 


Mit dem nachgestellten Ausdruck ,p wird der Computer angewiesen, die Daten 
in codierter Form zu speichern. Ein auf diese Weise gespeichertes Programm 
kann nach dem Laden nicht aufgeLISTet werden, und wenn man es bei der 
Durchfiihrung mit [ESC] stoppt, wird es geléscht. 
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Mit ,p gespeicherte Programme kénnen nur mit den Befehlen: 
run "programm" [RETURN] 

..und: 
chain "programm" [RETURN] 


.. direkt gestartet werden. 


Bevor Sie diese Form der Speicherung wahlen, sollten Sie sich eine ungeschitzte 
Aufzeichnung machen, um sich die Méglichkeit von Anderungen offenzuhalten. 


Binardateien 


save "programm",b, Startadresse ,:Dateilange 
[,:Anfangspunkt>] [RETURN] 


Damit kénnen Sie das Programm, so wie es im RAM des Computers gespeichert 
ist, in binarer Form auf Diskette ibertragen. Dazu mu der Computer wissen, an 
welcher Stelle (Adresse) im Speicher sich die aufzunehmenden Daten befinden, 
wie lang die Datensammlung ist, und, wenn ndétig, an welchem Punkt die 
Programmausfithrung beginnen soll. 


Bildschirmabdruck (screen dump) 


Mit dieser Methode der binadren Speicherung kénnen Bildschirmanzeigen direkt 
auf Diskette aufgenommen werden. Der Befehl: 


save "scrndump",b,49152,16384 [RETURN] 


speichert das Bild so, wie Sie es sehen. Es fangt bei der Adresse 49152 im 
Bildschirmspeicher an, und die Lange des Bildschirmspeicherbereichs, der 
tibertragen werden soll, betragt 16384. Mit dem Befehl: 


load "scrndump” [RETURN] 


..holen Sie das Bild wieder auf den Bildschirm. 


Weitere Informationen iiber das Ubertragen von Programmdateien auf Disketten 
(und Kassetten) finden Sie weiter hinten im Handbuch. 


Zum Schlu8 wberpriifen Sie noch einmal, ob Sie folgende Punkte unter 
‘WICHTIGE HINWEISE’ am Beginn des Handbuches beachtet haben: 


‘Hinweise zur Inbetriebnahme’: Punkt 5, 6 und 7 
‘Hinweise zum Betrieb’: Punkt 1, 2, 3, 4, 5, 6, 7 und 9 
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Teil 8: Bildschirm-Modus, 
Farben und Graphik 


Auf dem Schneider CPC6128 Colour Personal-Computer sind drei verschiedene 
Darstellungsarten (Modi) méglich: Modus 0, Modus 1 und Modus 2. 


Nach dem Einschalten des Computers ist automatisch Modus 1 eingestellt. 


Um den Unterschied zwischen den drei Modi zu sehen, schalten Sie den Computer 
ein und driicken die Taste mit der 1. Halten Sie die Taste, bis zwei Zeilen mit 
Einsern vollgeschrieben sind. Wenn Sie jetzt zahlen, sehen Sie, da in jeder Zeile 
4@ Ziffern stehen. Das heiBt, daB im Modus 1 vierzig Spalten zur Verfigung 
stehen. Driicken Sie jetzt [RETURN] - Sie bekommen zwar einen Syntaxfehler, 
aber der stért uns nicht. Wir kommen auf diese Weise schneller auf Ready 
zuriuck, so daB wir die nachste Anweisung eingeben kénnen. 


Tippen Sie: 
mode @ [RETURN] 


Sie sehen, daB die Schrift auf dem Bildschirm jetzt gréBer ist. Schreiben Sie 
wieder zwei Zeilen mit Einsern voll. Jetzt zahlen Sie nur noch 20 Ziffern pro 
Zeile. Das heiSt, in Mode 0 haben wir 20 Spalten zur Verfiigung. Drucken Sie 
wieder [RETURN]. 


Tippen Sie nun: 
mode 2 [RETURN] 


Dies ist der kleinste Modus, und wenn Sie eine Reihe mit Einsern vollgetippt 
haben und zahlen, kommen Sie auf 80. In Modus 2 haben wir also 80 Spalten. 


Fassen wir zusammen: 
Modus 0 = 20 Spalten 
Modus 1 = 40 Spalten 
Modus 2 = 80 Spalten 


Driicken Sie noch einmal [RETURN]. 
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Farben 


Sie haben 27 Farben zur Auswahl. Diese sind auf dem griinen Bildschirm (GT65) 
als unterschiedlich helle Griinstufen dargestellt. Wenn Sie einen GT65 haben, 
kénnen Sie einen Schneider MP2 Modulator mit Netzteil dazukaufen, um die 
Farbméglichkeiten des Computers mit Ihrem eigenen Farbfernseher 
auszuschépfen. 


In Modus 0 kénnen bis zu 16 der 27 Farben gleichzeitig verwendet werden. 
In Modus 1 kénnen bis zu 4 der 27 Farben gleichzeitig verwendet werden. 
In Modus 2 k6nnen bis zu 2 der 27 Farben gleichzeitig verwendet werden. 


Sie kénnen Sie Farben des Bildrandes (BORDER), des Schriftuntergrundes odes 
‘Papiers’ (PAPER) und der Schrift oder des Schreibstifts (PEN) unabhangig 
voneinander bestimmen. 


Die Palette der 27 méoglichen Farben ist mit der jeweils zugeh6rigen 
INK-Nummer in Tabelle 1 aufgefihrt. 


Damit Sie sie immer gleich zur Hand haben, ist sie auferdem auf dem Computer, 
rechts vom Tastenfeld, aufgedruckt. 


Farbtabelle 


INK Farbe INK  Farbe 
Nr. Nr. 


schwarz griin leuchtend griin 
blau blaugriin seegriin 

leuchtend blau himmelblau leuchtend blaugriin 
rot gelb limonengriin 
magenta wei pastellgriin 

mauve pastellblau pastell-blaugriin 
leuchtend rot orange leuchtend gelb 
purpur rosa pastellgelb 
leuchtend magenta pastellmagenta leuchtend wei’ 


0 
1 
2 
3 
4 
5 
6 
7 
8 


Tabelle 1: Die INK-Nummern und ihre Farben 
Wie schon erwahnt, steht der Computer beim Einschalten auf Modus 1. Um von 
einem anderen Modus auf Modus 1 zuriickzukommen, tippen Sie: 


mode 1 [RETURN] 
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Schreibstift (PEN) 


Schneider 128K Microcomputer (v3) 
C 1985 Amstrad Consumer Electronics ple 
and Locomotive Software Ltd. 


BASIC 1.1 


Ready 
a 


Rand (BORDER) 


Schreibflache (PAPER ) 


Der Rand (BORDER) ist die Zone um die eigentliche Schreibflache (PAPER). 
Beim Hinschalten sind sowoh] BORDER als auch PAPER blau. Die Schrift kann 
nur auf der Schreibflache, innerhalb des Randes, stehen. PAPER ist der 
Untergrund, auf dem die Schriftzeichen stehen, PEN (Schreibstift) bezeichnet den 
Schreibstift, mit dem die Zeichen geschrieben werden. 


Wir zeigen jetzt, wie die Farben auf dem Bildschirm ausgewahlt werden, und wie 
Sie sie verandern kénnen. 


Beim Einschalten, oder nach dem Zurticksetzen des Computers ist BORDER (der 
Rand) immer in Farbe 1 dargestellt. Wie Sie aus Ihrer Farbtabelle entnehmen 
kénnen, ist Farbe 1 blau. Wenn Sie den Rand gern in einer anderen Farbe hatten, 
geben Sie den Befehl BORDER mit der Nummer der gewiinschten Farbe ein. Soll 
der Rand z.B. weiB erscheinen, tippen Sie: 


border 13 [RETURN] 


So weit, so gut. Nun kommen wir zum schwierigeren Teil. 


Beim Einschalten, oder nach dem Zurticksetzen des Computers ist PAPER 
automatisch auf @, und PEN auf 1 gestellt. Allerdings stimmen 8 und 1 NICHT 
mit den Nummern auf der Farbtabelle tiberein! 


Sie miissen sich merken, daB @ und 1 PAPER- und PEN-Nummern sind. Sie sind 
KEINE INK-Farbnummern. Um sich dies zu verdeutlichen, stellen Sie sich vor, 
Sie haben vier Fiillfederhalter, Nr. 0, 1, 2 und 3. Jeden dieser Filler kénnen Sie 
mit einer Farbe aus 27 verschiedenen Tintenfassern, die von 0 bis 26 numeriert 
sind, fiillen. Es folgt also, da8 Filler Nr.1 nicht unbedingt immer mit derselben 
Farbe schreibt, da er mit verschiedenen Tinten gefiillt werden kann. Wenn Sie 
wollten, kénnten Sie sogar jeden Filler mit derselben Tinte fillen. 


Grundlagenkurs Kapitel 1 Seite 53 


Genauso ist es mit dem Computer. Mit dem Befehl PEN wahlen Sie einen der vier 
Filler, und mit dem Befehl INK die Tintenfarbe fiir diesen Filler. 


Sie erinnern sich, da wir den Standardmodus (Modus 1 = 40 Spalten) eingestellt 
haben. Wenn Sie sich die erste und dritte Spalte in der Tabelle 2 unten ansehen, 
stellen Sie fest, da8 der PEN-Nummer 1 die INK-Farbnummer 24 zugeordnet ist. 
Sehen Sie in ihrer Farbtabelle nach, welche Farbe unter Nummer 24 aufgefiihrt 
ist: es ist leuchtend gelb, die Schriftfarbe, die erscheint, wenn Sie den Computer 
einschalten. 


STANDARDFARBEN 


INK-Farbe INK-Farbe INK-Farbe 
PAPER/PEN Modus 0 Modus 1 Modus 2 


10 

12 

14 

16 

18 

22 

blinkend 1,24 
blinkend 16,11 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 


Tabelle 2: PAPER/PEN/MODE/INK Zuordnungstabelle 
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Die Zuordnung zwischen PAPER, PEN und INK ist jedoch nicht unabanderlich. 
Es ist lediglich die Standardeinstellung, die Sie vorfinden, wenn Sie den 
Computer einschalten oder zurticksetzen. Mit dem INK-Befehl kénnen Sie die 
Farben des Schriftuntergrunds (PAPER) und der Schrift (PEN) verandern. Die 
Anweisung enthalt zwei Teile, sogenannte Parameter. Erstens mu8 die Nummer 
des PENs angegeben werden, mit dem geschrieben werden soll, bzw. die Nummer 
des PAPERs, auf dem geschrieben werden soll, und zweitens mu die Nummer 
der INK-Farbe angegeben werden. Diese beiden Teile der Anweisung werden 
durch Komma getrennt. 


Wir wissen, da8 wir z.Z. mit PEN Nummer 1 schreiben (Standardeinstellung). 
Um die INK-Farbe des PENs in orange umzuwandeln, missen wir schreiben: 


ink 1,15 [RETURN] 


Sie sehen, da die Schrift jetzt orange wird. 


Entsprechend koénnen Sie mit dem INK-Befehl die Farbe der Schreibflache 
(PAPER) andern. Wir wissen, daB PAPER beim Einschalten die Nummer @ hat. 
Um die Schreibflache griin einzufarben, geben wir als zweiten Parameter im 
INK-Befehl die Nummer 9 an: 


ink @,9 [RETURN] 
Jetzt wollen wir einen anderen Filler (PEN) verwenden. Schreiben Sie: 

pen 3 [RETURN] 
Beachten Sie, da8 jetzt nur die Schrift nach dem Befehl ihre Farbe andert. Wir 
schreiben also mit PEN Nummer 3, und aus der Tabelle 2 kénnen Sie 
entnehmen, daB PEN 3 automatisch mit INK-Farbe Nr. 6 (leuchtend rot) 
schreibt. Wir kénnen die Farbe jetzt in rosa verwandeln, indem wir schreiben: 


ink 3,16 [RETURN] 


Die 3 in dieser Anweisung steht fiir die Nummer des PENs, den wir vorhin 
gewahlt hatten, und 16 ist die Nummer fiir die Farbe rosa. 


Nun wollen wir einen anderen Schriftuntergrund (PAPER) wahlen. Wenn 
PAPER geandert wird, andert sich der Untergrund des bisher geschriebenen 
nicht. Dies wird deutlich, wenn Sie eintippen: 


paper 2 [RETURN] 
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Wieder kénnen Sie anhand der Tabellen 1 und 2 feststellen, weshalb der 
Schriftuntergrund jetzt leuchtend blaugriin wird. Mit folgendem INK-Befehl 
verwandeln Sie ihn in schwarz: 


ink 2,@ [RETURN] 


Auf dem Bildschirm haben wir jetzt Schrift von PEN 1 und PEN 3 auf PAPER @ 
und PAPER 2. Sie kénnen auch die Farbe von einem PEN oder PAPER 
verandern, die Sie im Moment nicht benutzen. Mit dem Befehl: 


ink 1,2 [RETURN] 
..Z.B. Andern Sie die Farbe der Schrift, die Sie vorhin mit PEN 1 geschrieben 
haben. 


Léschen Sie nun die Schreibflache mit: 
cls [RETURN] 


Nun miiSten Sie eigentlich in der Lage sein, die ursprtinglichen Farben auf dem 
Bildschirm (blauer Rand, blaue Schreibflache, gelbe Schrift) mit den BORDER-, 
PAPER-, PEN- und INK-Befehlen wiederherzustellen. Versuchen Sie es. Gelingt 
es Ihnen nicht, setzen Sie den Computer mit [CONTROL] [SHIFT] [ESC] zuriick. 


Blinkende Farben 


Sie kénnen die Schrift in zwei Farben abwechselnd blinken lassen. Dazu missen 
Sie im INK-Befehl, mit dem Sie die PEN-Farbe festlegen, eine zweite 
Farbnummer angeben. Wenn Sie die Schrift abwechselnd in leuchtend wei und 
leuchtend rot blinken lassen méchten, schreiben Sie (nachdem Sie den Computer 
zurtickgesetzt haben): 


ink 1,26,6 [RETURN] 


1 ist die PEN-Nummer, 26 steht fiir die Farbe leuchtend weif und 6 ist 
leuchtend rot. 


Genauso kénnen Sie den Schriftuntergrund in zwei Farben blinken lassen. Dazu 
geben Sie im INK-Befehl, mit dem Sie die PAPER-Farbe festlegen, eine zweite 
Farbnummer an. Wenn der Schriftuntergrund abwechselnd griin und leuchtend 
gelb blinken soll, schreiben Sie: 


ink @,9,24 [RETURN] 
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@ ist die PAPER-Nummer, 9 ist die Farbe griin und 24 ist leuchtend gelb. 
Setzen Sie den Computer nun mit [CONTROL] [SHIFT] [ESC] zuriick. 


In Tabelle 2 sehen Sie, daB im Modus 0 fiir PEN 14 und 15 bzw. PAPER 14 und 
15 schon zwei blinkende Farben vorgesehen sind. Sie sind also mit einem 
zusatzlichen INK-Parameter vorprogrammiert worden. 


Tippen Sie folgendes ein: 


mode @ [RETURN] 
pen 15 [RETURN] 


Jetzt sehen Sie das Wort Ready auf Ihrem Bildschirm abwechselnd in 
himmelblau und rosa blinken. 


Tippen Sie: 


paper 14 [RETURN] 
cls [RETURN] 


Jetzt blinkt auch der Schriftuntergrund, und zwar in gelb und blau. 


Die Farben 14 und 15 far PEN und PAPER kénnen Sie mit dem INK-Befehl in 
eine andere Farbe oder zwei andere blinkende Farben umwandeln. 


Auch den Rand kénnen Sie in zwei Farben blinken lassen. Dazu geben Sie im 
BORDER-Befehl zwei Farbnummern an. Schreiben Sie: 


border 6,9 [RETURN] 


Jetzt sehen Sie den Rand in leuchtend rot und griin blinken. Beachten Sie, da} 
fiir die Wahl der Randfarbe(n) die gesamte Farbpalette (27 Farben) zur 
Verfiigung steht, gleichgiiltig, ob Sie Modus 0, 1 oder 2 eingestellt haben. 


Setzen Sie den Computer mit [CONTROL], [SHIFT] und [ESC] zuriick. 


Zur Demonstration der farblichen Mdglichkeiten Ihres Computers tippen Sie 
folgendes Programm ein und lassen es laufen: 
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18 MODE @ CRETURN] 

20 rate=600: REM bestimmt tempo des programms [RETURN] 
3@ FOR b=@ TO 26 [RETURN] 

4@ LOCATE 3,12 [RETURN] 

5@ BORDER b [RETURN] 

6@ PRINT "Randfarbe";b [RETURN] 
7@ FOR t=1 TO rate [RETURN] 
8@ NEXT t,b [RETURN] 

96 CLG [RETURN] 

180 FOR p=@ TO 15 [RETURN] 

11@ PAPER p [RETURN] 

128 PRINT "paper";p [RETURN] 
138 FOR n=@ TO 15 [RETURN] 

14@ PEN n [RETURN] 

158 PRINT "“pen";n [RETURN] 

16@ NEXT n [RETURN] 

170 FOR t=1 TO rate*2 [RETURN] 
188 NEXT t,p [RETURN] 

198 MODE 1 [RETURN] 

2908 BORDER 1 [RETURN] 

21@ PAPER @ [RETURN] 

220 PEN 1 [RETURN] 

230 INK @,1 [RETURN] 

248 INK 1,24 [RETURN] 

run [RETURN] 


HINWEIS 


In obigem Programm, wie auch in den Beispielprogrammen der weiteren 
Kapitel, sind die BASIC-Schlisselwérter in GROSSBUCHSTABEN 
dargestellt. So erscheinen die Schliisselwérter auch auf dem Bildschirm, 
wenn der Computer ein Programm aufLIS$ Tet. Im allgemeinen ist es besser, 
wenn Sie die Befehle mit kleinen Buchstaben eintippen, da Sie dann beim 
AufLISTen eventuelle Tippfehler leichter finden, weil der Computer ein 
falsch geschriebenes BASIC-Schliisselwort nicht in Grofschreibweise 
wiedergibt. 


In diesem Kapitel werden von jetzt ab die Schlisselwérter in den 
Programmen sowohl gro8- als auch kleingeschrieben, so da Sie sich an die 
neue Schreibweise gewéhnen kénnen. 


Variablennamen wie x oder a$ werden beim Auflisten des Programms nicht 
in Grofbuchstaben dargestellt, obwohl der Computer sie in jedem Fall 
erkennt, ob sie im Programm nun groB- oder kleingeschrieben wurden. 
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Achtung! 


Von jetzt ab werden wir nicht mehr nach jeder Programmzeile [RETURN] 
schreiben. Wir gehen davon aus, da Sie die Taste mittlerweile automatisch 
driicken. 


Graphik 


Der Computer hat eine ganze Reihe von Symbolen gespeichert. Mit dem 
Schliisselwort: 


chr$C€ ) 


..kénnen Sie diese Symbole ausgeben lassen. In Klammern sollte die Nummer 
des Symbols, eine Zah] zwischen 32 und 255, stehen. 


Setzen Sie den Computer mit [CONTROL], [SHIFT] und [ESC] zuriick und tippen 
Sie: 

print chr$(258) 
Vergessen Sie nicht, [RETURN] zu driicken. Auf dem Bildschirm erscheint 
Symbol 25@, ein Mannchen, das nach rechts lauft. 


Um alle Zeichen und Symbole mit ihren Nummern auffiihren zu lassen, schreiben 
Sie folgendes Programm, wobei Sie daran denken, nach jeder Zeile [RETURN] zu 
driicken: 


10 for n=32 to 255 
20 print n;chr$(n) 
30 next n 


Im Kapitel 7 (‘Ubersicht’) sind alle Zeichen und Symbole mit ihren Nummern 
aufgefiihrt. 
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LOCATE 


Mit diesem Befehl] kann der Cursor an eine gewiinschte Stelle auf dem Bildschirm 
gesetzt werden. Ohne LOCATE-Befehl beginnt der Cursor in der linken, oberen 
Ecke des Bildschirms. Dies ist der Koordinatenpunkt 1,1 (dies bedeutet, erste 
Position auf der horizontalen x-Achse und erste Position auf der vertikalen 
y-Achse). In Modus 1 haben wir 40 Spalten und 25 Zeilen. Um den Cursor in 
Modus 1 in die Mitte der ersten Zeile zu riicken, geben wir als Koordinatenpunkt 
20,1 an. 


Um sich das zu verdeutlichen, schreiben Sie (mit [RETURN] nach jeder Zeile): 
mode 1 

Der Bildschirm wird freigemacht, und der Cursor riickt in die linke, obere Ecke. 
10 locate 26,1 
20 print chr$(25@) 
run 

Um zu zeigen, dai die Figur tatsachlich in der obersten Zeile steht, schreiben Sie: 


border @ 


Der Rand ist jetzt schwarz, und Sie sehen das Mannchen in der Mitte der obersten 
Zeile der Schreibflache. 

Im Modus 0 haben wir nur 20 Spalten, aber wieder 25 Zeilen zur Verfiigung. 
Schreiben Sie: 


mode @ 
run 


Jetzt erscheint das Mannchen oben rechts auf der Bildflache, weil in diesem 
Modus Punkt 20 der x-Koordinate auf der letzten Spalte liegt. 


Im Modus 2 haben wir 80 Spalten und 25 Zeilen. Wenn Sie das Programm 
unverandert lassen, kénnen Sie wahrscheinlich erraten, wo das Mannchen dieses 
Mal auftaucht. Schreiben Sie: 


mode 2 
run 


Um zu Modus 1 zuriickzukehren, schreiben Sie: 


mode 1 
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Probieren Sie jetzt selbst aus, mit den Befehlen Locate und chr$(C ) 
verschiedene Symbole auf unterschiedliche Bildschirmpositionen zu setzen. Hier 
ein weiteres Beispiel: 


locate 20,12:print chr$(24B) 


Sie sehen jetzt einen Pfeil in der Bildschirmmitte. In dieser Anweisung steht die 
Zahl: 


28 far den Punkt auf der horizontalen x-Koordinatenachse (Bereich 1 bis 40) 
12 fir den Punkt auf der vertikalen y-Koordinatenachse (Bereich 1 bis 25) 
240 fir die Nummer des Symbols 


Durch folgendes Programm wird das Symbol wiederholt tiber den ganzen 
Bildschirm geschrieben: 


18 CLS 

206 FOR x=1 TO 39 
3@ LOCATE x,20 

58 PRINT CHRS$(250) 
6@ NEXT x 

7@ GOTO 18 

run 


Drticken Sie zweimal die [ESC]-Taste, um das Programm abzubrechen. 


Wenn das Symbol auf dem Bildschirm geléscht werden soll, bevor ein neues 
erscheint, schreiben Sie: 


5@ print " ";chr$ (256) 


Diese Zeile ersetzt automatisch die alte Zeile 5@ im Programm. 


Nun tippen Sie: 


run 


FRAME 


Figen Sie nun folgende Anweisung hinzu, um die Bewegung der Symbole auf 
dem Bildschirm gleichmafiger zu gestalten: 


40 frame 
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Der FRAME-Befehl synchronisiert die Bewegung von Zeichen auf dem Bildschirm 
mit dem Strahlriicklauf. Wenn Ihnen diese Erklarung zu technisch ist, merken 
Sie sich einfach, da der Befehl dann eingesetzt wird, wenn sich Symbole oder 
Graphiken gleitend iiber den Bildschirm bewegen sollen. 


Dieses Programm 1]a8t sich noch weiter verbessern, indem man noch einige 
Verzégerungsschleifen einbaut und ein anderes Symbol in die Gegenrichtung 
laufen laBt. 


Schreiben Sie: 
list 


..und erganzen Sie das Programm mit folgenden Zeilen: 


1@ CLS 

20 FOR x=1 TO 39 

38 LOCATE x,26 

40 FRAME 

5@ PRINT " "“;CHRS$(250) 
6@ NEXT x 

7@ FOR n=1 TO 380:NEXT n 
806 FOR x=39 TO 1 STEP -1 
9@ LOCATE x,26 

100 FRAME 

110 PRINT CHR$(251);" " 
120 NEXT x 

130 FOR n=1 TO 38@:NEXT n 
148 GOTO 20 


PLOT 


Im Gegensatz zum LOCATE-Befehl benutzen wir den PLOT-Befehl, um die 
Position des Graphik-Cursors zu bestimmen, dieses Mal mit Pixel-Koordinaten. 
(Ein Pixel ist ein Bildpunkt, oder die kleinste darstellbare Einheit auf dem 
Bildschirm.) 


Beachten Sie, daB der Graphik-Cursor unsichtbar, und nicht identisch mit dem 
Text-Cursor ist. 


In horizontaler Richtung hat der Bildschirm 640 Pixel, in vertikaler Richtung 400 
Pixel. Der Ursprung des Koordinatenkreuzes mit dem Punkt 0,0 liegt in der Ecke 
unten links auf dem Bildschirm. Die Pixel-Koordinaten bleiben im Modus 0, 1 
und 2 immer gleich. 
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Um dies zu testen, setzen Sie den Computer mit [CONTROL] [SHIFT] [ESC] 
zurtck und schreiben: 


plot 320,260 


In der Mitte des Bildschirms kénnen Sie nun einen winzigen Punkt erkennen. 


Andern Sie jetzt den Modus mit: 


mode @ 
plot 320,200 


Sie sehen, dai der Punkt sich noch an derselben Stelle befindet, jedoch etwas 
gréBer geworden ist. Andern Sie wieder den Modus und geben dieselben 
Koordinaten an: 


mode 2 
plot 320,200 


Der Punkt ist immer noch in der Mitte, aber viel kleiner. 


Setzen Sie mehrere Punkte in unterschiedlichen Modi an verschiedene Stellen des 
Bildschirms, um sich mit dem PLOT-Befehl vertraut zu machen. Wenn Sie damit 
fertig sind, kehren Sie zum Modus 1 zuriick und léschen gleichzeitig den 
Bildschirm mit: 


mode 4 


DRAW 


Setzen Sie den Computer zunachst mit [CONTROL] [SHIFT] [ESC] zuriick. Mit 
dem Befehl DRAW ziehen Sie eine Linie, ausgehend von der gegenwartigen 
Position des Graphik-Cursors. Um dies zu verdeutlichen, zeichnen Sie mit 
folgendem Programm ein Rechteck auf den Bildschirm. 


Dabei bringen wir den Graphik-Cursor mit dem PLOT-Befehl an die 
Ausgangsposition, ziehen dann mit DRAW eine Linie zur linken oberen Ecke, von 
dort zur rechten oberen Ecke usw. Schreiben Sie: 


5 cls 

18 PLOT 18,10 
20 DRAW 10,390 
30 DRAW 638,398 
40 DRAW 630,10 
50 DRAW 18,10 
68 GOTO 68 

run 
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Driicken Sie zweimal [ESC], um das Programm abzubrechen. 


(Sehen Sie sich Zeile 6@ einmal genauer an. Der Computer hat die Anweisung, 
solange eine Schleife um Zeile 60 zu drehen, bis Sie aus dem Programm 
‘ausbrechen’, indem Sie zweimal die [ESC]-Taste driicken. Eine derartige 
Anweisung empfiehlt sich, wenn Sie verhindern wollen, dai der Computer gleich 
nach Ausfiihrung des Programms abbricht, und sich mit Ready wiedermeldet.) 


Figen Sie jetzt die folgenden Programmzeilen hinzu, mit denen ein zweites 
Rechteck innerhalb des ersten gezeichnet wird: 


10 PLOT 10,10 
28 DRAW 10,390 
30 DRAW 630,398 
40 DRAW 630,19 
50 DRAW 10,10 
66 PLOT 26,20 
70 DRAW 20,380 
88 DRAW 620,380 
90 DRAW 620,20 
108 DRAW 20,26 
112 GOTO 110 
run 


Drticken Sie wieder zweimal die [ESC]-Taste, um das Programm abzubrechen. 


MOVE 


Wie mit PLOT wird der Graphik-Cursor mit dem Befehl MOVE an einen 
gewunschten Koordinatenpunkt gesetzt. Allerdings wird an der neuen 
Cursorposition kein Pixel (Bildpunkt) abgebildet. 


Schreiben Sie: 


cls 
move 639,399 


Der Graphik-Cursor befindet sich nun in der oberen rechten Ecke, obwohl wir 
nirgends eine Spur von ihm entdecken kénnen. 


Wir kénnen dies tberprifen, indem wir von seiner Position eine Linie zur 
Bildschirmmitte ziehen. Schreiben Sie: 


draw 320,200 
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Kreise 


Kreise kénnen entweder geplottet oder gezeichnet werden. Eine Méglichkeit, 
einen Kreis zu bilden, besteht darin, die Koordinatenpunkte jedes Punktes auf 
der Kreislinie zu plotten. Wenn Sie sich die Abbildung unten ansehen, erkennen 
Sie, da8 der Punkt p auf der Kreislinie mit folgenden x- und y-Koordinaten 
geplottet werden kann: 


x=19B*cos(a) 
y=190*sin(a) 


200 


Ecke des 
Bildschirms 


320 


Das Plotten von Kreispunkten 


In den vorigen Programmen haben wir die Koordinatenpunkte auf die linke 
untere Ecke des Bildschirms bezogen. Wenn wir einen Kreis genau in die Mitte 
des Bildschirms plazieren wollten, muBten wir den Kreismittelpunkt auf den 
Koordinatenpunkt 320,200 plotten und diese Koordinaten dann zu allen 
Kreispunkten hinzuaddieren. 


Ein Kreis nach dieser Methode wird mit folgendem Programm gezeichnet: 


1@ CLS 

28 DEG 

3B FOR a=1 TO 368 

40 MOVE 320,200 

50 PLOT 326+190*COS(a),200+190*SIN(a) 
68 NEXT 
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Beachten Sie das Schliisselwort NEW vor dem eigentlichen Programm. NEW sagt 
dem Computer, da der Speicher geléscht werden soll. Es hat also eine ahnliche 
Funktion wie [CONTROL] [SHIFT] [ESC], mit dem Unterschied, dal der 
Bildschirm dabei nicht geléscht wird. 


Der Kreisradius kann verkleinert werden, indem man die Anzahl der 
Kreispunkte (in unserem Beispiel 190) reduziert. 


Der Kreis wird anders geplottet (im Bogenma), wenn man die Zeile 2@ entfernt. 
Léschen Sie Zeile 20, indem Sie einfach: 


20 
eintippen. 


Einen ausgefillten Kreis bekommen Sie, wenn Sie das Schlisselwort PLOT in 
Zeile 5@ durch DRAW ersetzen: 


50 draw 320+198*cos(a) ,200+190*sin(a) 


Probieren Sie diese Version mit und ohne Zeile 2@ aus. 


Sie haben vielleicht bemerkt, daB wir in Zeile 6@ statt NEXT a einfach NEXT 
geschrieben haben. Dies ist zulassig, da der Computer automatisch die richtige 
FOR-Anweisung zum angegebenen NEXT ermittelt. Fir Programme, in denen 
viele FOR...NEXT-Schleifen vorkommen, ist es jedoch der Ubersichtlichkeit 
halber zu empfehlen, den Namen der Variablen in der NEXT-Anweisung 
anzugeben. 


ORIGIN 


Im vorigen Programm haben wir mit MOVE den Kreismittelpunkt angegeben und 
dann die Mittelpunktkoordinaten zu den Kreislinienkoordinaten addiert. Mit dem 
Befehl ORIGIN kénnen wir uns diese Prozedur sparen und den 
Koordinatenursprung einfach in die Kreismitte verlegen. Dann sieht das 
Programm so aus: 


new 

1@ CLS 

26 FOR a=1 TO 360 

30 ORIGIN 320,200 

40 PLOT 198*COS(a),190*SIN(a) 
5@ NEXT 

run 
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Plotten Sie nun vier kleinere Kreise mit folgendem Programm: 


7@ ORIGIN 196,116 

80 

9@ ORIGIN 442,116 

108 PLOT 5@*COS(a),5@*SIN(a) 
118 NEXT 

run 


CLS 
FOR a=1 TO 368 
ORIGIN 196,282 


PLOT 50*COS(a),50*SIN(a) 


ORIGIN 442,282 


PLOT 50*COS(a),50*SINCa) 


PLOT 50*COS(a),50*SINCa) 


Das folgende Programm zeigt Ihnen, wie ein Kreis auf andere Art erstellt wird: 


MODE 1 

ORIGIN 328,280 
DEG 

MOVE 8,196 


FOR a=@ TO 3686 STEP 18 
DRAW 196*SINCa),190*C0S (a) 


NEXT 


Dieses Mal wird die Kreislinie durch den Befehl DRAW von Koordinatenpunkt zu 
Koordinatenpunkt gezogen. Das geht erheblich schneller als mit PLOT. 

Sehen Sie sich auch hier an, was geschieht, wenn der Befehl DEG in Zeile 30 
entfernt wird. 


FILL 


Der Befehl FILL bewirkt, da ein Bildschirmbereich, der durch Linien oder den 
Bildschirmrand bzw. den Rand eines Bildschirmteilbereichs (Window) begrenzt 
ist, ausgefillt wird. 
Setzen Sie den Computer mit [CONTROL] [SHIFT] [ESC] zuriick und tippen Sie 
folgendes Programm ein: 


new 
18 
20 
36 
40 
50 
run 


CLS 

MOVE 26,208 
DRAW 620,26 
DRAW 310,386 
DRAW 20,20 


Grundlagenkurs 
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Auf dem Bildschirm erscheint nun ein Dreieck. Setzen Sie den Graphik-Cursor in 
die Mitte mit der Anweisung: 


move 320,200 


Wenn wir jetzt das Schliisselwort FILL mit einer PEN-Nummer, z.B. 3, 
eingeben, wird dieser PEN, von der Position des Graphik-Cursors ausgehend (in 
diesem Fall von der Mitte), den Bereich bis zu den gezogenen Linien ausfillen. 
Schreiben Sie: 


fill 3 

Setzen Sie nun den Graphik-Cursor auSerhalb des Dreiecks: 
move 6,0 

...und sehen Sie, was passiert, wenn Sie jetzt 
fill 2 


eintippen. 


Der Computer hat mit PEN Nummer 2 die gesamte Flache zwischen den 
gezogenen Linien und dem Bildschirmrand ausgefiillt. 


Andern Sie nun das Programm, indem Sie die folgenden Zeilen eintippen, und 
sehen Sie sich das Resultat an: 


new 

18 CLS 

26 MOVE 20,20 
38 DRAW 620,20 
40 DRAW 310,380 
58 DRAW 50,58 
66 MOVE 320,200 
7@ FILL 3 


Sie sehen, daB Liicken in den Grenzlinien die Farbe durchsickern 1aB8t! 
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Dies zeigt sich auch deutlich, wenn Sie einen geplotteten Kreis ausfiillen wollen. 
Schreiben Sie: 


CLS 

FOR a=1 TO 368 

ORIGIN 320,268 

PLOT 198*COS(Ca),190*SIN(a) 
NEXT 

MOVE -188,0 

FILL 3 


Vergleichen Sie, was passiert, wenn Sie einen mit dem Befehl DRAW gezeichneten 
Kreis ausfiillen: 


MODE 1 

ORIGIN 320,200 

DEG 

MOVE 6,198 

FOR d=@ TO 368 STEP 10 
DRAW 198*SINCd),198*COS (Cd) 
NEXT 

MOVE -188,@ 

FILL 3 


Wir kénnen die Kreislinie auch unsichtbar machen, indem wir dem PEN die 
Farbe (INK) des PAPERs zuordnen. Erganzen Sie das Programm mit: 


45 


run 


GRAPHICS PEN 2:INK 2,1 


Mit dem Schltisselwort GRAPHICS PEN wahlen Sie den PEN, mit dem Sie 
etwas auf den Graphik-Bildschirm zeichnen wollen. Mit dem Befehl INK teilen 
Sie dem PEN die gewiinschte Farbe zu (in diesem Fall Farbe Nummer 1, die 
PAPER-Farbe). 
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-—_---—r—r—r————————— ees 


Schreiben Sie zum SchluB noch folgendes Demonstrationsprogramm: 


18 MODE @:BORDER 13 

20 MOVE 0,200:DRAW 640,200 
38 FOR x=88 TO 56@ STEP 8@ 
40 MOVE x,@:DRAW x,400 

50 NEXT:MOVE -40,300 

60 FOR c=@ TO 7 

70 MOVER 86,@:FILL c 

8@ MOVER @,-200:FILL c+8 
98 MOVER @,200:NEXT 

188 GOTO 190 

run 


Mit folgender Erganzung kénnen Sie die Farben der ausgefiillten Bereiche 
variieren. Schreiben Sie: 


18 MODE ®:BORDER 13 

20 MOVE 0,200:DRAW 640,200 
30 FOR x=80 TO 560 STEP 80 
40 MOVE x,@:DRAW x,408 

5@ NEXT:MOVE -48,300 

68 FOR c=6 TO 7 

70 MOVER 8@,@:FILL c 

88 MOVER @,-200:FILL c+8 

98 MOVER @,200:NEXT 

100 SPEED INK 30,30 

11@ BORDER RND*26,RND*26 

120 INK RND*15,RND*26,RND*26 
130 FOR t=1 TO 5@@8:NEXT:GOTO 1168 
run 


Eine detailliertere Beschreibung der graphischen Moéglichkeiten des CPC6128 
finden Sie im Abschnitt tiber Graphik im Kapitel ‘Wenn Sie gerade Zeit haben’. 


Zum Abschlu8 dieses Abschnitts haben wir einige Demonstrationsprogramme zur 
Graphik aufgefiihrt, die viele Befehle und Schlisselwérter enthalten, die Sie 
gerade kennengelernt haben. Jedes Programm lauft endlos. 


new 
18 BORDER @:GRAPHICS PEN 1 
2@ m=CINTCRND*2):MODE m 


eee 
Kapitel 1 Seite 70 Grundlagenkurs 


30 11=RND*26:12=RND*26 

40 IF ABS(i1-i2)<108 THEN 38 

50 INK @,i1:INK 1,12 

60 s=RND*5+3:0RIGIN 320,-100 

70 FOR x= -1800 TO @ STEP s 

80 MOVE @,0:DRAW x,300:DRAW 0,600 

90 MOVE @,0:DRAW -x,300:DRAW 0,600 
100 NEXT:FOR t=1 TO 2000:NEXT:GOTO 20 
run 


18 MODE 1:BORDER @:PAPER @ 

2@ GRAPHICS PEN 2:INK @,0°i1=14 

30 EVERY 2208 GOSUB 158 

40 flag=@:CLG 

5@ INK 2,14+RND*12 

60 bZ=RND*5+1 

70 cZ=RND*5+1 

88 ORIGIN 320,200 

90 FOR a=@ TO 1800 STEP P1/3@ m 
1060 x%Z=188*COS(a) 

11@ MOVE xZ%,yzZ 

126 DRAW 200*COS(a/bZ%) ,200*SINCa/c%) 
130 IF flag=1 THEN 48 

140 NEXT 

150 flag=1:RETURN 


10 MODE 1:BORDER @:DEG 

20 PRINT "Bitte warten" 

30 FOR n=1 TO 3 

40 INK @,@:INK 1,26:INK 2,6:1NK 3,18 

50 IF n=1 THEN sa=12@ 

60 IF n=2 THEN sa=135 

76 IF n=3 THEN sa=15@ 

8@ IF n=1 THEN ORIGIN @,-58,8,640,0,408 ELSE ORIGIN 0,0 
,0,640,0,400 

98 DIM cx(5),cy(5),r(5),lc(5) 

160 DIM np(5) 

118 DIM px%(5,81),py%(5,81) 

126 st=1:cx(1)=320:cy(1)=200:r(1)=88 

130 FOR st=1 TO 4 

146 r(stt+1)=r(st)/2 

15@ NEXT st 

160 FOR st=1 TO 5 

170 lc(€st)=O:np(st)=4 


Grundlagenkurs Kapitel 1 Seite 71 


188 np(st)=np (st) +1 

198 pxz(st,np(std =ar(st)*SIN(lc(st)) 

200 py%éCst,np(st) er (st) *cOS(le(st)) 

218 lc (std=lce(st)+368/r(st) 

220 IF lc(st) < 368 THEN 180 

230 px%(st,np(st)+1)=pxz(st,1) 

248 py%(st,np(st)+1)=py%z(st,1) 

258 NEXT st 

268 CLS:cj=REMAIN(1):cj=REMAIN(2) 

276 cj=REMAIN(3):INK 1,2:st=1 

288 GOSUB 358 

298 LOCATE 1,1 

300 EVERY 25,1 GOSUB 516 

318 EVERY 15,2 GOSUB 550 

320 EVERY 5,3 GOSUB 596 

330 ERASE cx,cy,r,lc,np,px%,py4:NEXT 

340 GOTO 346 

358 cx%=cx(stdicy%é=cy(st)i:le(st)=B8 

360 FOR x%Z=1 TO np(st) 

370 MOVE cx%,cys% 

388 DRAW cx%tpx%z(st,x%),cyétpy%Z(st,x“z),1+(st MOD 3) 
39H DRAW cx%tpxkz(st,x%t+1) ,cysztpysz(st,x%+1),1+0st MOD 3) 
408 NEXT x% 

418 IF st=5 THEN RETURN 

420 lc(st)=B 

430 cx(stt+1)=cx(st)+1.5%r(st)*SIN(satlc(st)) 
440 cy(stt+1)=cy(st)+1.5¥r(st)*COS(satlc(st)) 
458 st=stt1 

460 GOSUB 358 

470 st=st-1 

480 lc(st)=lc(st)+2%sa 

490 IF (lce(€st) MOD 368)<>@ THEN 430 

500 RETURN 

518 ik(1)=1+RND*25 

520 IF ik(€1)=ik€2) OR ik(€1)=ik(3) THEN 518 
530 INK 1,ik(1) 

548 RETURN 

558 ik(€2)=1+RND*25 

56@ IF ik€2)=ik(1) OR ik(2)=ik(3) THEN 550 
578 INK 2,ik(2) 

5808 RETURN 

590 ik(3)=1+RND*25 

600 IF ik(€3)=ik(€1) OR ik(€3)=ik(2) THEN 598 
618 INK 3,i1k(3) 

62@ RETURN 
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Teil 9: Tonerzeugung 


Klange gibt der Computer tiber einen eingebauten Lautsprecher aus. Wenn Sie 
mit einem MP2 Modulator/Netzteil und Ihrem Fernseher arbeiten, sollten Sie den 
Ton des Fernsehgerates abstellen. 


Die Lautstarke kénnen Sie mit dem VOLUME-Regler rechts am Computer 
einstellen. Sie konnen den Ton auch iber die STEREO-Buchse des Computers auf 
Thre Stereoanlage tibertragen, so daB Sie die Musik des Computers in Stereo 
-tiber die Lautsprecher oder Kopfhérer - genie8en kénnen. Im 2.Teil dieses 
Kapitels erfahren Sie, wie die Stereoanlage an den Computer anzuschliefen ist. 


Der SOUND-Befehl 


Der Befehl SOUND besteht aus sieben Teilen oder Parametern. Die ersten beiden 
Parameter miissen angegeben werden, die anderen kénnen nach Wunsch 
eingesetzt werden. Der Befehl hat folgende Form: 


SOUND -Kanalstatus: ,:Tonperiode ,.Dauer ,Lautstarke , 
<Lautstarken-Hiillkurve ,:Ton-Hullkurve , Rauschen> 


Das sieht ganz schén kompliziert aus, aber wenn wir jeden Parameter 
analysieren, bekommen wir die Sache bald in den Griff. Sehen wir uns also die 
einzelnen Parameter der Reihe nach an: 


Kanalstatus 


Der Einfachheit halber betrachten wir den :Kanalstatus> vorlaufig als Gré8e, die 
angibt, welcher Tonkanal benutzt wird. Es gibt drei Tonkandle, und wir benutzen 
jetzt ‘Kanalstatus> Nr. 1. 


Tonperiode 


‘Tonperiode> ist der technische Ausdruck fiir die Héhe eines Tones, fiir die Note, 
die gespielt werden soll. Jede Note hat eine Nummer, die fir den Parameter 
<Tonperiode> eingesetzt wird. Wenn Sie im Kapitel Ubersicht’ nachsehen, stellen 
Sie fest, da8 das eingestrichene C die Tonperiode 239 hat. 
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Setzen Sie den Computer mit [CONTROL] [SHIFT] [ESC] zuriick und schreiben 
Sie: 


18 sound 1,239 
run 


Fur 0,2 Sekunden horen Sie das eingestrichene C. 


Wenn Sie nichts gehért haben, priifen Sie, ob der Lautstarkeregler am Computer 
vielleicht auf 0 stand. Drehen Sie auf und tippen Sie noch einmal RUN ein. 


Dauer 


Dieser Parameter setzt die Lange eines Tones fest. Die Einheit fiir die Dauer ist 
0,01 Sekunden (eine Hundertstelsekunde). Wenn Sie die Dauer nicht angeben, 
wird automatisch der Wert 28 angenommen. Deshalb dauerte der eben gehérte 
Ton 0,2 Sekunden (= 0,01 x 20). 


Fur eine Tondauer von einer Sekunde muf der Wert 100 angegeben werden, und 
soll der Ton zwei Sekunden dauern, mu8 200 angegeben werden. Tippen Sie: 


18 sound 1,239,268 
run 


Jetzt héren Sie das eingestrichene C zwei Sekunden lang. 


Lautstarke 


Dieser Parameter bestimmt die Lautstarke am Anfang eines Tones. Es kénnen 
Werte zwischen @ und 15 angegeben werden (Bei @ ist nichts zu héren, 15 ist 
die maximale Lautstarke.) Wird fir <Lautstarke nichts angegeben; nimmt der 
Computer automatisch 12 an. Schreiben Sie: 


18 sound 1,239,200,5 
run 


Merken Sie sich die Lautstarke dieses Tones, und geben Sie dann denselben 
Befehl mit einem gréferen Lautstarkewert ein: 


18 sound 1,239,200,15 
run 


Sicher héren Sie den Unterschied. 
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Lautstarken-Hullkurve 


Die Lautstarken-Hillkurve kann mit dem Befehl ENV bestimmt werden. Mit ihr 
]aBt sich die Lautstarke eines Tones wahrend seiner Dauer variieren. Sie kénnen 
mehrere verschiedene Lautstarken-Hillkurven definieren, die jeweils mit einer 
Nummer versehen werden. Wenn Sie mit ENV eine Lautstarken-Hillkurve mit 
der Nummer 1 bestimmt haben, die Sie im SOUND-Befehl einsetzen wollen, 
geben Sie fir den Parameter «Lautstarken-Hillkurve> 1 an. In Kirze werden wir 
erlautern, wie eine Lautstarken-Hiillkurve definiert wird. 


Ton-Hullkurve 


Die Ton-Htillkurve kann mit dem Befehl ENT bestimmt werden. Mit ihr 148t sich 
die Hodhe eines Tones wahrend seiner Dauer variieren, so da ein 
Vibrato-Ahnlicher Effekt entsteht. Sie kénnen mehrere_ verschiedene 
Ton-Hillkurven definieren, die jeweils mit einer Nummer versehen werden. 
Wenn Sie mit ENT eine Ton-Hillkurve mit der Nummer 1 bestimmt haben, die 
Sie im SOUND-Befehl einsetzen wollen, geben Sie fiir den Parameter 
‘Tonhtlikurve’ 1 an. In Kiirze werden wir erlautern, wie eine Ton-Hillkurve 
definiert wird. 


Rauschen 


‘Rauschen> ist der letzte Parameter des SOUND-Befehls. Der Computer bietet 31 
Arten von Rauschen zur Begleitung des Tones an, die durch Angabe eines Wertes 
zwischen 1 und 31 gewahlt werden kénnen. Figen Sie am Ende des 
SOUND-Befehls den Wert 2 an und horen Sie den Effekt. Setzen Sie dann fir 
‘Rauschen> den Wert 27 ein und achten Sie auf den Unterschied. Schreiben Sie: 


18 sound 1,239,200,15,,,2 
Beachten Sie die beiden ‘Leer’-Parameter (,,,) vor dem <Rauschen-Parameter 


2. Diese mu8ten wir einfiigen, weil wir keine Lautstarken-Hullkurve> und keine 
‘Tonhtllkurve> definiert haben. 


Definition einer Lautstarken-Hullkurve 


Das Schlisselwort zur Definition einer Lautstarken-Hillkurve (engl. Volume 
ENVelope) hei&t ENV. In seiner einfachsten Form besteht der Befehl] aus vier 
Parametern und sieht folgendermafen aus: 


ENV «Hillkurvennummer-, <Schrittanzahl ,<Schrittweite>,.Dauer pro Schritt- 
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Wieder wollen wir uns die Parameter der Reihe nach genauer ansehen: 


Hillkurvennummer 


Dies ist die Nummer (zwischen 1 und 15), die einer bestimmten 
Lautstarken-Hillkurve gegeben wird, damit sie im SOUND-Befehl aufgerufen 
werden kann. 


Schrittanzahl 


Dieser Parameter bestimmt, wieviele Lautstarkeveranderungen ein Ton wadhrend 
seiner Dauer durchlaufen soll. Wenn Sie z.B. in einen 10 Sekunden dauernden 
Ton 10 verschiedene Lautstarkeschritte von jeweils einer Sekunde Dauer 
einbauen wollen, missen Sie fiir den Parameter <Schrittanzahl], den Wert 18 
angeben. 


Fur die ‘Schrittanzahl> kénnen die Werte @ bis 127 angegeben werden. 


Schrittgrésse 


Die Differenz zwischen den einzelnen Lautstarkeschritten kann zwischen @ und 
15 betragen, da im SOUND-Befeh] 16 verschiedene Lautstarkegrade méglich 
sind. Als ‘SchrittgréBe--Parameter kénnen jedoch Werte zwischen -~128 und 
127 angegeben werden. Die Lautstarke geht dabei jedesmal auf @ zuriick, wenn 
das Maximum erreicht ist. 


Schrittzeit 


Dieser Parameter bestimmt die Zeit zwischen den einzelnen Lautstarkeschritten 
in Einheiten zu Hundertstelsekunden (0,01 Sekunden). Es kénnen Werte von 0 
bis 255 eingesetzt werden, d.h. ein Lautstarkeschritt kann héchstens 2,56 
Sekunden lang sein (@ wird als 256 behandelt). 


Beachten Sie, da die Dauer aller Lautstarkeschritte zusammengenommen nicht 
langer sein sollte als die Dauer des Tones, die Sie im SOUND-Befehl angeben. 
Sonst hért der Ton auf, bevor alle Lautstarkeschritte durchlaufen sind. (In solch 
einem Fall verfallt der Rest der Lautstarken-Hillkurve.) 


Ist dagegen der Schrittzeit--Parameter im SOUND-Befehl gré8er als die Dauer 
aller Lautstarkeschritte zusammen, wird der Ton fur den Rest seiner Dauer auf 
der letzten Lautstarkestufe verharren. 
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Experimentieren Sie nun mit der Lautstarken-Hillkurve in folgendem 
Programm. Tippen Sie: 


16 env 1,10,1,100 
26 sound 1,142,1800,1,1 
run 


Zeile 2@ definiert eine Note mit der Tonperiode 142 (Kammerton a), die 18 
Sekunden dauert, eine Anfangslautstarke von 1 hat und die 
Lautstarken-Hillkurve 1 benutzt. Die Lautstarken-Hiillkurve 1 wird in Zeile 18 
definiert. Sie besteht aus 1@ Schritten, in denen die Lautstarke jeweils um 1 
erhoht wird, und zwar nach je einer Sekunde (100 x 0,01 Sekunden). 


Andern Sie Zeile 10 des Programms wie folgt, um die unterschiedlichen Effekte 
der Hillkurven zu hoéren: 


10 env 1,1080,1,1@ 
18 env 1,1080,2,16 
18 env 1,108,4,18 
18 env 1,58,28,28 
10 env 1,58,2,2@ 
18 env 1,58,15,36 


Versuchen Sie zum Schlu8 noch diese Variation: 
18 env 1,56,2,18 


Sie merken hierbei, da8B die Lautstarke nach der Halfte der Zeit konstant bleibt. 
Das liegt daran, da8 wir 5@ Schritte von jeweils 0.1 Sekunden hatten. Die Zeit, in 
der die Lautstarke verandert wurde, betrug also insgesamt 5 Sekunden, wahrend 
die Dauer des Tones im SOUND-Befeh] mit 1888, also 10 Sekunden, angegeben 
war. 


Probieren Sie jetzt selbst, verschiedene Tone zu erzeugen. 


Wenn Sie eine kompliziertere Lautstarken-Hillkurve bilden wollen, kénnen Sie 
die Parameter <Schrittanzah), <SchrittgréBe-) und Schrittzeit» in der 
ENV-Anweisung bis zu viermal wiederholen. Sie haben dann mehrere Abschnitte 
in derselben Hullkurve. 


Definition einer Ton-Hullkurve 


Das Schlisselwort zur Definition einer Ton-Hillkurve (engl. Tone ENvelope} 
heif®t ENT. In seiner einfachsten Form besteht der Befeh] aus vier Parametern 
und sieht folgendermafen aus: 
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ENT -Hullkurvennummer: ,:Schrittanzahl ,:Tonperiode des Schrittes, <Schrittzeit> 


Sehen wir uns die Parameter wieder einzeln an: 


Hullkurvennummer 


Dies ist die Nummer (@ bis 15), die einer bestimmten Hillkurve gegeben wird, 
damit sie im SOUND-Befehl aufgerufen werden kann. 


Schrittanzahl 


Dieser Parameter bestimmt, wieviele Tonhéhen-Variationen der Ton wahrend 
seiner Dauer durchlaufen soll. Wenn Sie z.B. in einen 10 Sekunden dauernden 
Ton 10 verschiedene Tonhdhen-Schritte von jeweils einer Sekunde Dauer 
einbauen wollen, mtissen Sie fiir den Parameter <Schrittanzahl]) den Wert 198 
angeben. 


Fir die Schrittanzahl stehen die Werte @ bis 239 zur Verfiigung. 


Tonperiode des Schrittes 


Die Differenz zwischen den einzelnen Tonhéhen-Schritten kann zwischen -128 
und 127 betragen. Mit negativen Schritten nimmt die TonhGhe zu, mit positiven 
Schritten nimmt sie ab. Die kiirzeste Tonperiode ist 8. Dies darf beim Definieren 
der Ton-Hillkurve nicht vergessen werden. Im Kapitel ‘Ubersicht’ finden Sie eine 
Aufstellung aller Tonperioden. 


Schrittzeit 


Dieser Parameter bestimmt die Zeit zwischen den einzelnen Tonhéhen-Schritten 
in Einheiten zu Hundertstelsekunden (0,01 Sekunden). Es kénnen Werte von 0 
bis 255 eingesetzt werden, d.h. ein Schritt kann héchstens 2,56 Sekunden lang 
sein (@ wird als 256 behandelt). 


Beachten Sie, da8 die Dauer aller Schritte zusammengenommen nicht langer sein 
sollte als die Dauer des Tones, die Sie im $OUND-Befehl angeben. Sonst hort der 
Ton auf, bevor alle Tonhéhen-Variationen durchlaufen sind. (In solch einem Fall 
verfallt der Rest der Hillkurve.) 


Ist dagegen der -Dauer--Parameter im SOUND-Befehl gréSer als die Dauer aller 
Tonhéhen-Schritte zusammen, wird der Ton fiir den Rest seiner Dauer auf der 
letzten Tonhéhen-Stufe verharren. 
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Experimentieren Sie nun mit der Ton-Hillkurve in folgendem Programm. Tippen 


Sie: 


18 ent 1,1868,2,2 
28 sound 1,142,200,15,,1 
run 


Zeile 2@ definiert einen Ton mit der Tonperiode 142 (Kammerton a), der 10 
Sekunden dauert und eine Anfangslautstarke von 15 (maximale Laustarke) hat. 
Er hat keine Lautstarken-Hillkurve - dies wird durch den Leer-Parameter ,, 
signalisiert - und benutzt die Ton-Hiillkurve 1. Die Tonhillkurve 1 wird in Zeile 
1@ definiert. Sie besteht aus 18@ Schritten, in denen die Tonperiode jeweils um 2 
erhéht wird (d.h. die Tonhéhe nimmt ab), und zwar nach je 0,02 Sekunden (2 x 
0,01 Sekunden). 


Andern Sie Zeile 1@ des Programms nacheinander wie folgt, um die 
unterschiedlichen Effekte der Hillkurven zu héren: 


1@ ent 1,188,-2,2 
10 ent 1,18,4,28 
10 ent 1,180,-4,28 


Ersetzen Sie die Tonhillkurve und den SOUND-Befehl jetzt durch folgendes 
Programm: 


18 ent 1,2,17,70 

28 sound 1,71,148,15,,1 
38 goto 16 

run 


Driicken Sie zweimal [ESC], um das Programm abzubrechen. 


Sie kénnen nun die Lautstarken-Hillkurve, die Ton-Hillkurve und den 
SOUND-Befehl in einem Programm kombinieren, um verschiedenartige Klange 
zu erzeugen. Beginnen Sie mit: 


18 env 1,108,1,3 

20 ent 1,100,5,3 

38 sound 1,142,3080,1,1,1 
run 


Ersetzen Sie dann Zeile 2@ mit: 


20 ent 1,1860,-2,3 
run 
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Und andern Sie schlieBlich alle Zeilen um: 


18 env 1,188,2,2 

20 ent 1,100,-2,2 

36 sound 1,142,200,1,1,1 
run 


Wenn Sie eine kompliziertere Ton-Hiillkurve bilden wollen, kénnen Sie die 
Parameter <Schrittanzahl-, ‘Tonperiode des Schrittes» und <Schrittzeit> in der 
ENT-Anweisung bis zu viermal wiederholen. Sie haben dann mehrere Abschnitte 
in derselben Hiillkurve. 


Probieren Sie selbst einige Variationen aus. Erganzen Sie den SOUND-Befehl 
durch ein Rauschen und erweitern Sie die Lautstarken- und Ton-Hillkurve durch 
neue Abschnitte. 


Im Kapitel 3 ‘Liste aller Befehle des Schneider CPC6128 BASIC’ finden Sie alle 
Details zu den einzelnen Befehlen fiir die Tonerzeugung. Wenn Sie sich mehr fir 
den melodischen Aspekt der Tonerzeugung interessieren, lesen Sie den Abschnitt 
‘Der Ton macht die Musik’ im Kapitel 9. 


Kapitel 1 Seite 80 Grundlagenkurs 


Teil 10: Kurze Einfuhrung in 
AMSDOS und CPM 


Was ist AMSDOS? 


Wenn der Computer eingeschaltet oder zurtickgesetzt wird, arbeitet er 
automatisch mit AMSDOS. AMSDOS ist die Abkitrzung fiir Amstrad Disc 
Operating System (Amstrad Disketten-Betriebssystem). Es stellt folgende Befehle 
fiir die Dateiverwaltung zur Verfiigung: 


LOAD "Datei" 
RUN "Datei" 
SAVE "Datei" 


CHAIN "Datei" 
MERGE "Datei" 
CHAIN MERGE "Datei" 
OPENIN "Datei" 
OPENOUT "Datei" 
CLOSEIN 
CLOSEOUT 

CAT 

EOF 

INPUT #9 

LINE INPUT #9 
LIST #9 

PRINT #9 

WRITE #9 


Dartiberhinaus kennt AMSDOS_ noch eine’ Reihe’ von _ speziellen 
Steuerungs-Befehlen fiir die Disketten-Organisation. 


Diese Befehle werden externe Befehle genannt. Ihnen wird der Balken | 
vorangestellt (@ Taste mit [SHIFT]). 


Dies sind einige der gebrauchlicheren externen Befehle: 


la 
Ib 
I tape (kannin Itape.inund Itape.out unterteilt werden) 
Idisc (kannin Idisc.inund Idisc.out unterteilt werden) 
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la und |b werden beim Betrieb von zwei Diskettenlaufwerken verwendet, um 
anzuzeigen, fiir welches Laufwerk der dann folgende Befehl gilt. 


Die Anweisung: 


la 
load "Datei" 


..Z.B. sagt dem Computer, das genannte Programm von der im Laufwerk A 
befindlichen Diskette in den Speicher zu laden. 


Wird kein Laufwerk mit |a oder |b angesprochen, oder wurde der Computer 
zurtickgesetzt, arbeitet das System automatisch mit dem Laufwerk A. 


Falls Sie nur das eingebaute Diskettenlaufwerk benutzen, kénnen Sie es als 
Laufwerk A betrachten, und la oder |b braucht nicht angegeben zu werden. 
Geben Sie |b ein, obwohl kein zusatzliches Laufwerk angeschlossen ist, erscheint 
folgende Meldung auf dem Bildschirm: 


Drive B: disc missing 
Retry, Ignore or Cancel 


Sie sollten dann C fiir Cancel (= Befehl wiederrufen) eintippen. 


Wenn sie eine Kassette benutzen mochten 


Der Befehl | tape weist den Computer an, alle Lade- und Speicherbefehle usw. 
auf das externe Kassettenlaufwerk und nicht auf die Diskette zu beziehen. Ohne 
Angabe von Itape richtet der Computer nach dem Einschalten oder 
Zurticksetzen alle Befehle automatisch an das Diskettenlaufwerk. 


Wollen Sie vom Kassettenbetrieb wieder auf Diskettenbetrieb umstellen, tippen 
Sie: 


Idisc 


Es besteht auch die Méglichkeit, von Kassette zu laden und auf Diskette zu 
speichern. Dann schreiben Sie: 


Itape.in 


Dieser Befeh! weist den Computer an, Daten von der Kassette einzulesen, aber im 
ubrigen die Standardfunktion beizubehalten, d.h. auf Diskette zu schreiben. 
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Wenn Sie umgekehrt Daten von Diskette einlesen und auf Kassette speichern 
wollen, mtissen Sie erst I!disc.in eingeben, um den vorherigen Befehl 
Itape.in (s.o.) riickgangig zu machen. Dann weisen Sie den Computer mit 
Itape.out an, Daten auf Kassette zu speichern. 


Die Befehle |[tape.in und Idisc.in bzw. Itape.out und Idisc.out 
heben sich also gegenseitig auf. 


Weitere Informationen zur Ubertragung von Daten auf Diskette bzw. Kassette 
finden Sie im Kapitel 4 (Das Arbeiten mit Disketten und Kassetten) und Kapitel 
5 (AMSDOS und CP/M). 


Datentransfer zwischen Disketten bzw. Diskette 
und Kassette 

In Teil 7 dieses Kapitels haben Sie erfahren, wie eine neue Diskette mit dem 
DISCKIT3-Programm auf Seite 1 Ihres CP/M-Systemdiskettensatzes formatiert 


wird und wie ein Programm von einer Diskette auf eine andere kopiert wird. Mit 
folgenden Steuerbefehlen: 


Itape Idisc Itape.in Itape.out Idisc.in Idisc.out la Ib 


sind Sie nun in der Lage, Programme auf die Diskette in Laufwerk A, Laufwerk 
B (sofern angeschlossen) oder auf Kassette (sofern angeschlossen) zu speichern, 
bzw. von diesen Geraten zu laden. 


Weitere externe Steuerungsbefehle: 
Idir Idrive lera Iren luser 


lernen Sie im Kapitel 5 (AMSDOS und CP/M’) kennen. 


Kopieren einer ganzen Diskette 


Mit Hilfe des DISCK113-Programms auf Seite 1 Ihrer Systemdisketten kénnen 
Sie den Inhalt einer Diskette auf eine andere tibertragen. 


Mit dieser Methode kénnen Sie Reservekopien von den System-Disketten selbst 
machen. 


Legen Sie Seite 1 Ihrer System-Disketten in das eingebaute Diskettenlaufwerk 
und schreiben Sie: 


Icpm 


Grundlagenkurs Kapitel 1 Seite 83 


Wenn das Bereitschaftszeichen A> erscheint, schreiben Sie: 
disckit3 


Nach wenigen Sekunden sehen Sie die DISC KIT-Eréffnungsmeldung oben auf 
dem Bildschirm, sowie: 


One drive found 


Der Computer hat also verstanden, da8 Sie mit dem DISC KIT-Dienstprogramm 
und nur einem Diskettenlaufwerk (dem eingebauten) arbeiten. 


Haben Sie ein zweites Diskettenlaufwerk angeschlossen, lautet die Meldung: 
Two drives found 


Weiter unten auf dem Bildschirm sehen Sie folgendes Bild: 


Copy 
Format 
Verify 


Exit from program 


Dies ist das sogenannte DISC KIT-Hauptmena. Die Nummern im Kasten 
beziehen sich auf die Funktionstasten auf der rechten Seite des Tastenfeldes (f0, 
f1, f4 und f7). Wenn Sie eine der Tasten driicken, lauft das zugehérige Programm 
ab. 


Falls Sie an dieser Stelle @ driicken, verlassen Sie das DISC KIT-Programm und 
kehren zum direkten Konsolmodus CP/M (Bereitschaftszeichen A>) zuriick. 


Da wir jetzt eine Diskette kopieren wollen, driicken wir Taste f7. 


ACHTUNG! 


Das Kopieren auf eine bespielte Diskette léscht ihren Inhalt. 
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Kopieren mit einem Diskettenlaufwerk 


Wenn Sie nur mit dem eingebauten Laufwerk arbeiten, also kein weiteres 
Diskettenlaufwerk angeschlossen haben, erscheint nun die Meldung: 


Any other key to exit menu 


Daraufhin nehmen Sie die CP/M-Systemdiskette heraus und legen die Diskette 
ein, deren Daten kopiert werden sollen. Méchten Sie die CP/M-Systemdiskette 
selbst kopieren, lassen Sie sie drin. 

Befindet sich die Diskette, die kopiert werden soll (Quellendiskette) im Laufwerk, 
driicken Sie die Y-Taste fiir yes (d.h. ja, diese Diskette soll kopiert werden). 


Der Computer untersucht das Format der Diskette und gibt es oben auf dem 
Bildschirm an. Nach einer Weile kommt die Meldung: 


Insert disc to WRITE 
Press any key to continue 


Daraufhin nehmen Sie die Quellendiskette aus dem Laufwerk heraus und 
schieben die Diskette, auf die die Daten tibertragen werden sollen (Zieldiskette), 
hinein. Dann dricken Sie eine beliebige Taste. 


Oben auf dem Bildschirm wird nun das Format der Zieldiskette angezeigt (auch 
wenn es sich um eine neue, unformatierte Diskette handelt). 


Ist die Zieldiskette nicht oder unzureichend formatiert, wird dies beim 
Kopiervorgang beriicksichtigt. Sie sehen dann eine der folgenden Meldungen: 


Disc isn't formatted (Cor faulty) 

Going to format while copying 

Disc will be system format 
..oder eine ahnliche Mitteilung, je nachdem, welche Diskette kopiert wird. 
Hat der Computer den Teil der Diskette wtbertragen, kommt folgende 
Aufforderung: 


Insert disc to READ 
press any key to continue 


..woraufhin Sie wieder die Quellendiskette einlegen und eine beliebige Taste 
driicken. 
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Dieser Prozef} wiederholt sich einige Male, bis der gesamte Inhalt der 
Quellendiskette auf die Zieldiskette kopiert worden ist. Dann erscheint die 
Meldung: 


Copy completed 
Remove disc 
Press any key to continue 


Sie nehmen die Diskette heraus und driicken wieder eine beliebige Taste. Dann 
entscheiden Sie, ob Sie eine weitere Diskette kopieren wollen (Y-Taste driicken) 
oder zum DISC KIT-Meniti zuriickkehren méchten. 


Schreibschutz 


Denken Sie daran, da Sie nichts auf eine Diskette mit offenem Schreibschutzloch 
kopieren kénnen. Falls Sie dies versuchen, antwortet der Computer mit: 


Disc write-protected 
Insert disc to WRITE 
R-etry or C-ancel 


Sie tippen dann C fiir Cancel (Befehl wiederrufen) ein, nehmen die Diskette 
heraus und schieben die richtige Diskette mit geschlossenem Schreibschutzloch 
ins Laufwerk. 


Lassen Sie das Schreibschutzloch einer Diskette, deren Inhalt Sie behalten wol- 
len, immer geoffnet. Vor allem schlieBen Sie NIEMALS die Schreibschutzlécher 
Ihrer CP/M-Systemdisketten! 

Kopieren mit einem Doppellaufwerk 


Gehen Sie wie oben beschrieben vor: Laden Sie das DISCKIT3-Programm von 
Seite 1 und wahlen Sie Copy aus dem DISCKIT-Menii (Taste f7 driicken). 


Danach steht Ihnen ein weiteres Menii zur Auswahl: 


Read from A: 
Read from B: 


Exit menu 
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Wenn Sie mit einem Doppellaufwerk kopieren, brauchen Sie nicht standig die 
Disketten auszuwechseln. Mit dem obigen Menti kénnen Sie wahlen, in welches 
Laufwerk Sie die Quellendiskette einlegen wollen. Driicken Sie die Taste f8, 
wenn die Diskette in Laufwerk A kopiert werden soll. 


Nun erscheint das dritte Meni: 


Write to A 
Write to B 


Exit menu 


Hier haben Sie zu entscheiden, in welches Laufwerk Sie die Zieldiskette schieben 
wollen. Sie kénnen zur Aufnahme dasselbe Laufwerk benutzen, in das Sie auch 
die Quellendiskette legen. Dies wirde jedoch bedeuten, daB Sie die Disketten 
mehrere Male austauschen miBten. Sie hatten also keinen Vorteil von Ihrem 
Doppellaufwerk. 


Das Kopieren geht einfacher und schneller, wenn Sie auf die Diskette in 
Laufwerk B kopieren und die Taste f6 driicken. 


Schieben Sie nun die beiden Disketten in die zugehérigen Laufwerke und tippen 
Sie Y, um den Kopiervorgang einzuleiten. 


Wieder wird das Format der beiden Diskétten angezeigt, und wenn die 
Zieldiskette nicht oder unzureichend formatiert ist, wird dies beim Kopieren 
beriticksichtigt. 


Ist das Kopieren beendet, meldet der Computer: 


Copy completed 
Remove both discs 
Press any key to continue 


Sie mtissen dann BEIJDE Disketten herausnehmen, bevor Sie weitere Operationen 
vornehmen kénnen. Daraufhin kénnen Sie eine weitere Diskette kopieren 
(Y-Taste driicken) oder zum DISCKIT-Hauptmenii zuriickkehren (eine beliebige 
Taste driicken). 
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Prifung der Disketten 


Das DISKIT3-Programm bietet noch die Méglichkeit, eine Diskettenkopie auf 
ihre Richtigkeit hin zu itiberprifen. 


Das Format der Diskette wird angezeigt, und alle Dateien der Diskette werden 
gelesen. Etwaige Fehler in den Dateien erscheinen auf dem Bildschirm. 


Zum Uberpriifen einer Diskette legen Sie Seite 1 der Systemdisketten ein und 
tippen: 


Icpm 
Nach dem Bereitschaftszeichen A> schreiben Sie: 
disckit3 
Wahlen Sie jetzt die Option Verify aus dem DISC KIT-Menii (Taste f1) und 


folgen Sie den Anweisungen auf dem Bildschirm. 


Wenn Sie mit einem Doppellaufwerk arbeiten, haben Sie die Méglichkeit, die 
Diskette in Laufwerk A oder in Laufwerk B zu tberpriifen. 


Haben Sie die Diskette, deren Inhalt gepriift werden soll, in das entsprechende 
Laufwerk eingelegt, tippen Sie Y, um den Prifvorgang einzuleiten. 


Ist der Computer mit dem Priifen fertig, bringt er folgende Meldung: 


Verify completed 
Remove disc 
Press any key to continue 


Falls Sie mit einem Doppellaufwerk arbeiten, mtissen Sie BEIDE Disketten 
herausnehmen, bevor Sie weitere Operationen vornehmen kénnen. Mit Y kénnen 
Sie den Priifvorgang wiederholen, oder Sie kehren zum DISC KIT-Menii zuriick, 
indem Sie irgendeine andere Taste driicken. 


Kopieren mit CP/M 2.2 


Auf Seite 4 Ihres System-Diskettensatzes finden Sie ein weiteres DISC KIT 
Programm. Damit kénnen Sie Disketten formatieren, kopieren oder tiberpriifen, 
die mit dem oder fiir den CPC664 oder den CPC464 + DDI1 - beide arbeiten mit 
CP/M 2.2 - geschrieben wurden. Dieses Programm heiSt DISCKIT2, und es 
funktioniert genauso wie das eben beschriebene DIS CK11T3-Programm. 
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Wenn Sie mit DISCKIT2 arbeiten wollen, legen Sie Seite 4 Ihrer 
Systemdisketten in das Laufwerk und schreiben: 


Icpm 


Nachdem Sie die CP/M 2.2 Eréffnungsmeldung und das Bereitschaftszeichen A> 
erhalten haben, tippen Sie: 


disckit2 
Nun wahlen Sie aus den Meniis, was Sie brauchen und folgen den Anweisungen 


auf dem Bildschirm, wie fir DISCKIT3 beschrieben. 


Anmerkung: Beim Kopieren benutzt das DISCKIT2 -Programm den 
Bildschirmspeicher fir die Daten. Deshalb sehen Sie wahrend des 
Kopiervorganges wahllose Anzeigen auf dem Bildschirm. 


Weitere Information 


Informationen tiber die anderen Programme auf Ihrem CP/M Systemdiskettensatz 
finden Sie in den Kapiteln 4 bis 9. 


Zum Schlu8 tberpriifen Sie noch einmal, ob Sie die am Anfang des Handbuches 
genannten VorsichtsmaBnahmen mit dem Titel ‘WICHTIGE HINWEISE’ 
beachtet haben: 


‘Hinweise zur Inbetriebnahme’: Punkt 5, 6 und 7 
‘Hinweise zum Betrieb’: Punkt 1, 2, 3, 4, 5, 6, 7 und 9 
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Teil 11: Das BANK MANAGER - 
Programm 


Die zusatzlichen 64K 


Der Speicher des CPC6128 enthalt 128K RAM (Random Access Memory) in zwei 
Einheiten zu je 64K. CP/M Plus arbeitet die ganze Zeit mit dem gesamten 
Speicherplatz von 128K, wahrend BASIC normalerweise nur die ersten 64K, 
nicht aber die zweiten 64K benutzt. Es ware schade, wenn man die zusatzlichen 
64K beim Programmieren in BASIC véllig ungenutzt lassen mtiBte. Deshalb 
wurde ein Programm geschrieben, mit dem der erweiterte Speicherbereich auch 
fiir BASIC zugdnglich gemacht werden kann. Durch spezielle Befehle in diesem 
Programm kénnen die zweiten 64K RAM als. Speicherplatz fir 
Bildschirmanzeigen oder fiir Zeichenfolgen ausgewiesen werden. 


Das Programm mit diesen speziellen Befehlen hei&ft ‘BANK MANAGER’. Mit 
‘Bank’ bezeichnet man einen Teil des Speichers. 


Der BANK MANAGER fir Bildschirmanzeigen 


Beim 6128 ist jederzeit irgendetwas auf dem Bildschirm zu sehen. Er benétigt 
16K Speicherplatz, um die Information iiber die Farbe und Helligkeit jedes 
Bildpunktes (Pixel genannt) einer Bildschirmanzeige zu speichern. Der Speicher 
des 6128 kann bis zu sechs Bildschirmanzeigen - jede in einem 16K-Block 
- gleichzeitig speichern. Das BANK MANAGER-Programm gibt Ihnen die 
Méglichkeit, mit BASIC bis zu fiinf der sechs Bildschirmanzeigen auf den 
Bildschirm zu holen und sie auszuwechseln. 


Wenn Sie den Computer einschalten, sehen Sie ein Bild aus einem 
16K-Speicherbereich (wir nennen ihn Block 1) der ersten 64K. Die anderen vier 
Bilder, Block 2, Block 3, Block 4 und Block 5 genannt, befinden sich im zweiten 
64K-Speicher. 


Nur ein Bild aus Block 1 (der ersten 64K) kann auf den Bildschirm gebracht 
werden. Um also ein Bild aus den zweiten 64K (Block 2 bis 5) tatsachlich auf dem 
Bildschirm zu sehen, mu es erst nach Block 1 tranferiert werden. Der BANK 
MANAGER hat alle nétigen Befehle, um die Bildschirmanzeigen zwischen den 
Blécken hin- und herzuschieben. Mit |SCREENCOPY (Bildkopie) kann z.B. ein 
Bild von einem Block in einen anderen tibertragen werden, wobei das im letzteren 
Block befindliche Bild geléscht wird. Mit 1S CREENSWAP (Bildtausch) kann der 
Inhalt zweier Blécke ausgetauscht werden. 
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Wie die gerade behandelten AMSDOS-Befehle kennt auch der BANK MANAGER 
‘externe Befehle’, die mit dem Balken | (@Zeichen mit [SHIFT]) beginnen. 


Setzen Sie den Computer mit [CONTROL] [SHIFT] [ESC] zuriick, legen Sie Seite 1 
Thres Systemdiskettensatzes ein und schreiben Sie: 


RUN "BANKMAN" 


Das Laden des Programms ist ausfiihrlich im Kapitel 7 unter RSX (Resident 
System eXtensions) beschrieben. Es ist ratsam, sich Kenntnisse tiber RSX und 
tiber die Reservierung von Speicherplatz anzueignen, bevor Sie diese Teile in Ihr 
Programm einbauen. Fiir die folgenden Beispiele sind jedoch Kenntnisse tiber das 
Laden nicht erforderlich. 


Tippen Sie: 
MODE 1 


PRINT "STANDARDBILD" 
ISCREENSWAP,1,2 


Der Text ist nun verschwunden. Stattdessen sehen Sie das, was als Bild 2 in 
Block 2 gespeichert wurde. Wenn der Computer gerade angeschaltet wurde, wird 
dies ein zufalliges Muster sein. Um das Muster zu léschen, schreiben Sie: 


MODE 1 
..und tippen dann ein: 


PRINT "BILD 2" 
ISCREENSWAP,1,2 


Nun taucht Ihr erster Text wieder auf. Wenn Sie den _ Befehl 
ISCREENSWAP,1,2 wiederholen, werden die beiden Bildschirmanzeigen 
wieder ausgetauscht. Sie kénnen alle finf Bilder gegeneinander austauschen. 
Beachten Sie aber dabei, da sich das auf dem Bildschirm gezeigte Bild nur 
andert, wenn die 1 im I|SCREENSWAP-Befehl vorkommt. 

Der zweite Befehl in diesem Zusammenhang heift ISCREENCOPY. Damit 
kénnen Sie den Inhalt eines Blocks in einen anderen kopieren, wobei der Inhalt 
des anderen Blocks tiberschrieben wird. 


Tippen Sie: 
MODE 1 


PRINT "DIESES BILD SOLL KOPIERT WERDEN" 
ISCREENCOPY,2,1 
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Der Inhalt von Block 1 wird in Block 2 geschrieben. Wenn Sie die Parameter 
umkehren und schreiben: 


MODE 1 
ISCREENCOPY,1,2 


..wird das gegenwartig gezeigte Bild von Bild 2 tiberschrieben. 


Der erste Parameter gibt also an, in welchen Block das Bild kopiert werden soll, 
und der zweite Parameter bestimmt, aus welchem Block kopiert werden soll. 


Beachten Sie, wenn Sie mit ISCREENCOPY arbeiten, da’ ein 
unzusammenhangendes Bild auf dem Bildschirm erscheint, wenn die Modi der 
Bilder unterschiedlich sind, oder wenn das Bild nach dem letzten MODE-Befehl 
nach oben durchgerollt ist. Die SCREEN-Befehle des BANK 
MANAGER-Programms sind weniger fiir Bildschirmtexte als fiir graphische 
Darstellungen gedacht, bei denen das Wegrollen des Bildes selten vorkommt. 


Der BANK MANAGER zum Speichern von 
Textfolgen 


Der BANK MANAGER bietet auBerdem vier Befehle, mit denen die zusatzlichen 
64K als Speicherraum fir Textfolgen (Strings) reserviert werden kénnen. 


Die meisten Programme bestehen aus zwei Teilen: Erstens aus den Anweisungen 
und zweitens aus den Daten, die mit dem Programm verarbeitet werden. Ein 
gutes Beispiel fiir ein solches Programm ist ein Adressbuch-Programm, in dem 
Namen, Adressen usw. in Tabellenform gespeichert werden. Solch ein Programm 
nennt man Datenbank. 


Textfolgen (Strings) kénnen im zweiten 64K Speicher hintereinander liickenlos 
gespeichert werden. Der Speicher, in dem die Strings gespeichert werden, ]48t 
sich in gleich grofe Bereiche, sogenannte Satze, unterteilen. Ein Satz hat eine 
festgesetzte Lange von 2 bis 255 Zeichen, wahrend ein String in BASIC je nach 
Inhalt unterschiedlich lang sein kann. Die uniibersichtliche String-Information 
wird in die Satze eingeordnet. Nach jeder Operation, bei der Daten in einen Satz 
gespeichert oder von ihm abgerufen werden, wird zum nachsten Satz 
ubergegangen, damit die nachste Operation an ihm ausgefihrt wird. Der Satz, 
der fiir die nachste Operation bereit steht, wird ‘aktueller Datensatz’ genannt. 
Mit ihm wird automatisch gearbeitet, wenn kein anderer Datensatz angegeben 
wurde. 


Diese Art der Speicherplatzverwaltung nennen wir ‘RAMdisc’, weil dieses System 
ahnlich wie Random Access-Diskettensysteme funktioniert, nur stattdessen mit 
RAM (Random Access Memory) arbeitet. 
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Lesen Sie die Beschreibungen zu den folgenden Befehlen, damit Sie ihre Funktion 
verstehen, wenn Sie sie auch nicht selber anwenden kénnen, und probieren Sie 
dann die angegebenen Beispiele durch. 


Der erste RAMdisc-Befehl heiBt |BANKOPEN. Dieser Befehl gibt an, wieviele 
Zeichen jeder Satz maximal enthalten kann. Die Schreibweise des Befehls sieht so 
aus: 


IBANKOPEN,n 


n gibt dabei die Anzahl der Zeichen pro Satz an. Fir n kénnen Werte zwischen 0 
und 255 eingesetzt werden, wobei die Werte 0 und 1 in der Praxis untauglich 
sind. 


Mit |BANKWRITE kann ein String in einen aktuellen Datensatz gespeichert 
werden. Danach wird der nachste Datensatz ‘aktuell’ und steht fiir die nachste 
Operation bereit. Es gibt folgende Schreibweisen fiir diesen Befehl: 


IBANKWRITE,Ir%,a$ 
oder: 
IBANKWRITE,Ir%,a$,n 


r% ist eine ganzzahlige Variable, ein Code, der etwas iiber die Operation aussagt. 
a$ ist eine Stringvariable. Sie enthalt die Zeichen, die in den Satz geschrieben 
werden sollen. In der ersten Schreibweise wird der aktuelle Datensatz 
angesprochen. In der zweiten Schreibweise bezeichnet der Parameter n den 
Datensatz, in den geschrieben werden soll. 


Mit |BANKREAD wird der Inhalt des aktuellen Satzes als String ausgegeben. 
Danach wird der folgende Datensatz ‘aktuell’ und steht fiir die nachste Operation 
bereit. Beim Lesen andert sich der Inhalt eines Satzes nicht, so daf er beliebig oft 
gelesen werden kann. Fur | BANKREAD gibt es folgende Schreibweisen: 


| BANKREAD,Ir%,a$ 
oder: 

IBANKREAD, Ir%,a$,n 
r’% ist eine ganzzahlige Variable, ein Code, der etwas tiber die Operation aussagt. 
a$ ist eine Stringvariable, in die der Inhalt des Satzes gelesen werden soll. In der 


ersten Schreibweise wird der aktuelle Datensatz angesprochen. In der zweiten 
Schreibweise bezeichnet der Parameter n den Datensatz, der gelesen werden soll. 
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Der letzte Befeh] hei®Bt IBANKFIND. Er wird benutzt, um die Datensatze nach 
einem bestimmten String abzusuchen. Ist die Suche erfolgreich, so wird die 
Nummer des Satzes ausgegeben, in dem der String sich befindet. | BANKFIND 
hat die Schreibweisen: 


| BANKFIND,@r4%,a$ 
oder 

IBANKFIND,@r%,a$,n 
oder 

IBANKFIND,@r%,a$,n,m 


r% ist eine ganzzahlige Variable. Sie enthalt entweder die Nummer des Satzes, in 
dem der String gefunden wurde, oder einen Code, der anzeigt, daB der String 
nicht gefunden wurde. a$ steht fiir den gesuchten String. Der Wahlparameter n 
gibt an, ab welchem Satz die Suche beginnen soll. Wird n nicht angegeben, wird 
ab dem aktuellen Datensatz gesucht. Der Wahlparameter m gibt an, bei welchem 
Satz die Suche eingestellt werden soll, auch wenn der String bis dahin nicht 
gefunden wurde. Wird m nicht angegeben, so werden die ganzen 64K durchsucht, 
obwohl das Ende der Datei méglicherweise schon viel friiher erreicht ist. 


Probieren Sie die BANK-Befehle nun aus. Wenn Sie schon mit dem BANK 
MANAGER gearbeitet haben, um die SCREEN-Befehle zu testen, und wenn Sie 
den Computer seither nicht zuriickgesetzt haben, sind die Zusatzbefehle im 
Speicher vorhanden. Wenn nicht, miissen Sie Seite 1 Ihres Systemdiskettensatzes 
einschieben und 


RUN "BANKMAN" 
..eintippen. Dann schreiben Sie: 
| BANKOPEN,20 


Dadurch wird die Satzlange auf 20 Zeichen festgelegt und 0 als aktueller Satz 
bestimmt. Nun schreiben Sie: 


aS="ERSTER EINTRAG"+SPACES(6) 


Der String a$ ist also genau 20 Zeichen lang. 
Jetzt schreiben Sie: 


rr=0 


um den Beginn von r% bei @ festzusetzen. 
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Jetzt schreiben Sie: 
IBANKWRITE,@r4,a$ 
Damit wird a$ in den ersten Datensatz (Satz 0) geschrieben. Tippen Sie nun: 


d$=SPACES$(28) 
IBANKREAD,ar%,d$,0 
PRINT d$ 


Die erste Anweisung setzt die Lange von d$ auf 20 Stellen fest. Damit ist genug 
Platz vorhanden, wenn der Satz gelesen wird. Mit der zweiten Anweisung wird 
Satz 0 gelesen und das Ergebnis in d$ eingesetzt. Da nach der vorherigen 
IBANKWRITE-Operation der aktuelle Satz der Satz 1 ware, missen wir 0 
angeben, damit Satz 0 gelesen wird. (Sie erinnern sich: Wenn keine Satznummer 
angegeben wird, wird die Operation mit dem aktuellen Satz durchgefihrt.) 
SchlieBlich wird das Ergebnis der Leseoperation auf dem _ Bildschirm 
wiedergegeben. Fir d$ mite ‘ERSTER EINTRAG’ und 6 Leerstellen erscheinen. 


Schreiben Sie nun folgendes: 


b$="ZWEI"+SPACE$(16) 
c$="DREI"+SPACES(16) 
IBANKWRITE,ar%,b$,1 
IBANKWRITE,ar%,c$, 


Hiermit werden b$ und c$ in Satz 1 und 2 gesetzt. Wir haben im ersten 
IBANKWRITE-Befehl wieder den Wahlparameter benutzt, um Satz 1 als den 
Satz zu bestimmen, in den b$ gesetzt werden soll. Der folgende Satz wird danach 
automatisch zum aktuellen Satz, so da wir nicht anzugeben brauchen, wo c$ 
hingesetzt werden soll. Er wird automatisch in Satz 2 plaziert. 


Tippen Sie: 
PRINT rZ% 


Als Ergebnis miiBte jetzt fir r% die Zahl 2 auf dem Bildschirm erscheinen. Diese 
Nummer zeigt den Satz an, mit dem zuletzt operiert wurde, bzw. den aktuellen 
Satz minus 1. Im obigen Beispiel wurde zuletzt mit Satz 2 operiert, und der 
nachste Satz ist 3. 


Mit diesem ‘Riickkehr-Code’ kann also in Erfahrung gebracht werden, welche 
Operation gerade ausgefiihrt wurde. Bei einer erfolgreichen Operation wird eine 
positive Zahl angegeben, die fir die Satznummer steht. Bei einer erfolglosen 
Operation wird eine negative Zah] angegeben, die fiir einen Fehlercode steht. Bei 
IBANKWRITE und IBANKREAD kénnen zwei mégliche Fehler ausgegeben 
werden: 
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-1 zeigt an, da8 das Ende der Datei erreicht ist. Entweder wurden alle Satze 
durchgegangen, oder es wurde ein Satz angegeben, der nicht existiert. 


-2 zeigt Umschaltfehler bei der Bankauswahl an. Das diirfte eigentlich nicht 
vorkommen. 


Probieren Sie einige weitere Beispiele aus: 


d$=STRINGS(20,"X") 
IBANKOPEN, 26 
FOR n=1 to 3: 1BANKWRITE,ar4,d$:NEXT 


d$ besteht hier aus 20 ‘X’en. | BANKOPEN bestimmt 0 als aktuellen Satz, so daB 
I BANKWRITE den Inhalt der Satze 0, 1 und 2 mit d$ tiberschreibt. 


Schreiben Sie jetzt: 


a$="EINS" 
IBANKWRITE,ar%,a$,@ 


Auf diese Weise wird das Wort ‘EINS’ in den Satz 0 geschrieben und iiberschreibt 
dabei vier ‘X’e. Fiillen Sie d$ nun wieder mit Leerstellen aus: 


d$=SPACE$(26) 
AnschlieSend tippen Sie: 
IBANKREAD,ar%,d$,0 


Gehen wir die Schritte bis hierher noch einmal durch: 


Alle drei Satze enthalten Xe. Satz 0 enhalt auBerdem das Wort ‘EINS’. d$ wurde 
dann mit 20 Leerstellen ausgefiillt. Und schlieflich wurde Satz 0 wieder in d$ 
hineingelesen. Schreiben Sie nun: 


PRINT d$ 


Als Ergebnis sollte nun ‘EINSXXXXXXXXXXXXXXXX’ auf dem Bildschirm 
stehen. Hieran wird deutlich, was bei der Benutzung dieser Befehle zu 
beriicksichtigen ist. Wenn ein String einen Satz nicht ganz ausfillt, bleiben die 
alten Zeichen im Satz erhalten, soweit sie nicht tiberschrieben wurden. Deshalb 
empfiehlt es sich, den Satz mit Leerstellen oder CHR$(32)’s auszufillen, bevor 
man die neue Information darin abspeichert. Damit erspart man sich das Lesen 
des Strings, um festzustellen, ob er noch Zeichen enthalt, die dort nichts mehr zu 
suchen haben. Das gleiche gilt fiir den String, in den der Satz hineingelesen 
werden soll. Ist der String langer als der Inhalt des Satzes, bleiben am Ende des 
Strings Zeichen erhalten, die nicht dazugehéren. Darum wurde d$ geléscht (mit 
Leerstellen gefiillt), bevor Satz 0 in ihn hineingelesen wurde. 
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Es kann vorkommen, da8 man einen String in einen Satz schreiben will, der nicht 
genug Platz bietet. In dem Fall werden die Zeichen, die nicht mehr hineinpassen, 
nicht aufgenommen. 


Genauso kann es vorkommen, daf der Inhalt eines Satzes zu lang fiir den String 
ist, in den er gelesen werden soll. Auch hier werden die Zeichen, die nicht mehr 
hineinpassen, nicht beriticksichtigt. In gewodhnlichen Operationen mit Strings 
witirde BASIC den String automatisch auf die erforderliche Lange erweitern, doch 
mit einem externen Befeh!] ist das nicht méglich. 


Kommen wir schlieSlich noch zum Befehl |BANKFIND. Mit ihm werden alle 
Satze auf einen bestimmten Eintrag hin abgesucht. Wenn Satz 24 beispielsweise 
mit dem Wort "KARL" beginnt, kénnte er mit folgendem Befehl aufgespirt 
werden: 


|] BANKFIND,arZ,"KARL" 


Diese Méglichkeit ist besonders niitzlich in Datenbank-Programmen, wenn z.B. 
ein Name oder eine Adresse gesucht wird. 


| BANKFIND beginnt seine Suche im aktuellen Satz und kammt von da aus alle 
Satze durch, bis es den gesuchten String gefunden hat, oder bis das Ende der 
zweiten 64K, in denen die Satze gespeichert sind, erreicht ist. 


Man kann auch bestimmen, ab welchem Satz die Suche beginnen soll, indem man 
am Ende der Anweisung die betreffende Satznummer anfigt. 


Durch Angabe einer zweiten Satznummer kann man bestimmen, wo die Suche 
abgebrochen werden soll. 


IBANKFIND eignet sich auch fiir die Suche nach einem String, der nicht am 
Anfang eines Satzes steht. In dem Fall fiillt man die Stellen vor dem gesuchten 
String mit CHR$(@)’s aus. Die CHR$(@)’s werden als Universalzeichen (wie ? 
in CP/M Dateinamen) betrachtet, d.h. sie stehen fiir jedes beliebige Zeichen. Die 
Anweisung sieht dann z.B. so aus: 


aS=STRINGS (10,0)+"KARL" 
IBANKFIND,ar%,a$,0 


Jetzt wiirde untersucht, wo der String "KARL" zum ersten Mal auftritt. Er 
mite zwischen der 11. und 14. Stelle eines Satzes stehen. Die ersten 10 Zeichen 
kénnten eine Telefonnummer oder irgendeine andere Information enthalten, die 
von | BANKF IND ignoriert wird. 


Die Nummer des Satzes, in dem der String gefunden wurde, wird fir die Variable 


rf eingesetzt, die den Abfrage-Code darstellt (wenn "KARL" gefunden wird). 
Ansonsten wird der Abfrage-Code den Wert -3 enthalten. 
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Weitere Einzelheiten 


Nahere Einzelheiten tiber den BANK MANAGER finden Sie im Kapitel 8. 
Dartiberhinaus sollten Sie sich im Kapitel 7 (Teil 138 und 14) tiber RSX 
informieren. 


Uberpriifen Sie zum Schlu8 noch einmal, ob Sie folgende Punkte unter 
‘WICHTIGE HINWEISE’ am Anfang des Handbuchs beachtet haben: 


Punkt 1, 2, 3 und 9 aus dem Abschnitt ‘Hinweise zum Betrieb’. 


Damit ist nun unser elfteiliger Einfihrungskurs zum CPC6128 abgeschlossen. Sie 
kennen jetzt die Funktion der meisten Tasten auf der Tastatur, Sie kénnen einige 
der einfacheren BASIC-Befehle einsetzen, Sie kénnen eine nagelneue Diskette 
formatieren und somit gebrauchsfertig machen und Sie wissen iiber die 
wichtigsten Diskettenfunktionen, wie Laden und Speichern, Bescheid. AuBerdem 
kennen Sie ein paar AMSDOS-, CP/M- und BANK MANAGER-Befehle. 


In den folgenden Kapiteln werden die Funktionen des Computers und das 
Schneider-BASIC genauer beschrieben. Sie werden Ihre Kenntnisse tiber das 
eingebaute Diskettenlaufwerk, sowie tber AMSDOS und CP/M vertiefen kénnen, 
und Sie werden eine neue Sprache kennenlernen: Dr. LOGO von Digital 
Research. 


Viel Spas beim Lesen und gutes Gelingen! 
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Kapitel 2 
Das erste Programm 


Sie haben jetzt die Einfithrung gelesen und der Computer steht 
eingeschaltet vor Ihnen. Sie wissen, wie man mit FOR und 
NEXT eine Schleife bildet, und wie man IF und THEN 
anwendet, um den Computer eine Anweisung ausftthren zu 
lassen, wenn eine Bedingung erfiillt ist. 


Sie werden es bald tberdrtissig sein, auf dem ganzen Bildschirm nichts als Ihren 
Namen zu lesen. Sie werden ihn jetzt zu niitzlicheren Aufgaben oder zur 
Unterhaltung verwenden wollen. Im nachfolgenden Kapitel sind alle Schneider 
BASIC-Befehle samt einer Beschreibung ihrer ‘Syntax’ und ihrer Anwendung 
aufgefiihrt. 


Mit dieser Liste sind Sie in der Lage, den Computer zu allen méglichen Aufgaben 
zu bewegen - soweit es Ihre Phantasie erlaubt. 


Wenn Sie noch nie einen Computer benutzt haben, mag die Vorstellung, 
tatsachlich zu programmieren, etwas FurchteinfléRendes an sich haben. Haben 
Sie keine Angst! Es ist bei weitem einfacher, als Sie denken, und ganz gewif 
einfacher, als Sie von der Technologie und der Fachsprache her erwarten wiirden. 
Stellen Sie sich BASIC nicht als neue Sprache vor, sondern als eine Abwandlung 
des Englischen, die mit vielen Abkiirzungen arbeitet, um Zeit zu sparen. Mit 
anderen Worten, sehen Sie CLS nicht als magischen Code an, sondern als 
Kurzform fiir C Lear Screen. 


Versuchen Sie, keine Angst vor BASIC zu haben. So werden Sie bald Vergniigen 
am Programmieren finden und die Friichte Ihrer Bemtthungen ernten. 
Programmieren kann eine sehr lohnende Betatigung sein, besonders, wenn Sie 
Anfanger sind und mit dem Gerat und der Sprache experimentieren. Denken Sie 
immer daran, daf} nichts, was Sie eintippen, Ihrem Computer schaden kann, es 
sei denn, sie schreiben aus Versehen auf Ihre CP/M Systemdiskette. Es lohnt sich 
immer, etwas Neues auszuprobieren. 


Voruberlegungen 


Der Anfang ist fiir den Anfanger oft der schwierigste Teil des Programms. Sie 
sollten es allerdings vermeiden, sich gleich hineinzustirzen und in die Tasten zu 
hauen, ohne sich vorher Gedanken zu machen. 
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Als erstes sollten Sie tiberlegen, welche Méglichkeiten das Programm bieten soll, 
und wie die Ergebnisse auf dem Bildschirm dargestellt werden sollen. 


Wenn Sie sich dariiber klar geworden sind, kénnen Sie anfangen, ein Programm 
zu schreiben, das Ihre Anforderungen erfiillt. Dabei sollten Sie immer daran 
denken, da8 das Programm von Anfang bis Ende mdglichst reibungslos laufen 
sollte. Es sollte méglichst wenig gesprungen, d.h. mit dem Befehl GOTO 
gearbeitet werden. Ein gutes Programm wird tbersichtlich aufgebaut sein und 
Sie nicht in ein heilloses Durcheinander stiirzen, wenn Sie versuchen, einen 
Fehler zu finden. 


Zum Glick ist BASIC eine sehr nachsichtige und hilfsbereite Sprache. Wenn Sie 
z.B. etwas falsch gemacht haben, erscheinen haufig Fehlermeldungen auf dem 
Bildschirm. BASIC gestattet Ihnen auch, nachtraglich etwas zu erganzen. Neue 
Programmteile kénnen mit minimalem Aufwand in das bestehende Programm 
eingebaut werden. 


Wie man ein einfaches Programm schreibt 


Unser erstes Programm soll die Namen und Telefonnummern unserer Freunde 
speichern. Wir nennen dieses Programm ‘Telefonbuch’. Zundachst stellen wir uns 
die eben erwahnten Fragen: ‘Welche Méglichkeiten soll das Programm bieten?’ 
und ‘Wie sollen die Ergebnisse dargestellt werden?’ 


Wir nehmen einmal an, das Programm soll bis zu 100 Namen und 
Telefonnummern speichern. Es soll so beschaffen sein, daB Sie eine gesuchte 
Telefonnummer erhalten, wenn Sie den zugehérigen Namen eintippen. AuBerdem 
wollen Sie die Moglichkeit haben, eine vollstandige Liste der gesamten 
Information auf dem Bildschirm zu sehen. Haben Sie gemerkt, da wir uns schon 
automatisch Gedanken tiber die Darstellungsform der Ergebnisse auf dem 
Bildschirm gemacht haben? 


So, jetzt konnen Sie die Finger auf die Tasten legen. Schreiben Sie als erstes den 
Titel: 
18 REM Telefonbuch 


Es ist nicht unbedingt notwendig, dem Programm einen Titel zu geben, aber 
wenn sich ein paar Programme angesammelt haben, helfen Ihnen die Titel, die 
Programme auf einen Blick zu unterscheiden. 


Wir wissen, da8 wir eine Zeichenfolge (den Namen einer Person) fir eine 
Variable eingeben wollen (INPUT). Diese Variable nennen wir NAMES. Die 
Variable fiir die Telefonnummer nennen wir entsprechend TEL$. 
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Erinnern Sie sich an die Beispielprogramme aus dem Einfihrungskapitel? Dort 
wurde der INPUT-Befehl benutzt, um den Wert einer Variablen einzugeben. 
Wenn Sie also schreiben: 


2@ INPUT "Geben Sie den Namen an";NAMES 
30 INPUT "Geben Sie die Telefonnummer an";TEL$ 
run 


kénnen Sie einen Namen eintippen, z.B. Johann, und danach seine 
Telefonnummer, z.B. 08245 510. 


Das Programm hat diese Information nun gespeichert , aber es hat noch keine 
Ergebnisse auf dem Bildschirm gezeigt. Daher brauchen wir einen Programmteil, 
um die Information abfragen und auf dem Bildschirm sehen zu kénnen. Im 
Moment miiften wir, um die Werte von NAMES und TELS zu erhalten, Befehle 
verwenden wie: 


PRINT NAMES.....und.....PRINT TELS 


Aber warten Sie! Wir sagten, da&8& wir bis zu 100 Namen und 100 
Telefonnummern in dem Programm speichern wollen. Wir muUssen doch 
hoffentlich nicht ein Programm mit 288 INPUT-Befehlen schreiben, jeden mit 
einem anderen Variablennamen, und dann 2@@ PRINT-Befehle, um eine Liste 
der Namen und Telefonnummern auf dem Bildschirm zu erhalten!? Keine Angst, 
fiir solche Falle kann man im Computer Tabellen (Arrays genannt) einrichten. 
Kin Array erméglicht Ihnen, fiir eine Gruppe von Datenelementen eine einzige 
Variable (z.B. NAME$) zu verwenden. Um die Datenelemente zu unterscheiden, 
werden sie mit einer Nummer gekennzeichnet, die hinter der Variablen in 
Klammern angegeben wird. Diese Nummer bezeichnet man als Index, und einen 
Ausdruck wie NAME$(27) nennt man ‘indizierte Variable’. Wenn wir jetzt eine 
numerische Variable als Index verwenden, beispielsweise NAME$(x), kénnen 
wir die ganze Liste von Variablen von 1 bis 100 verarbeiten, indem wir den Wert 
fir x mit Hilfe einer Schleife (FOR x=1 TO 1@@) verandern. Da der Wert fiir x 
bei jedem Durchgang um 1 zunimmt, andert sich der Index und bezieht sich 
jedesmal auf ein anderes Datenelement, d.h. auf einen anderen Namen des 
NAME$-Arrays. 


Wir brauchen zwei Arrays, eines fiir NAME$ und eines fir TEL$, mit einer 
‘Dimension’ von jeweils 100 Elementen. Bevor wir ein Array einrichten, mtissen 
wir seine DIMension festlegen. Wir tberschreiben die Zeilen 2@ und 3@ daher 
mit folgenden Angaben: 


20 DIM NAME$(100) 
3@ DIM TEL$(1@@) 
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Wir haben jetzt unsere Variablen festgelegt. Nun wollen wir ein Programm ° 
schreiben, das uns in die Lage versetzt, Namen und Telefonnummern in die 
Arrays einzutragen, damit wir sie spater abfragen kénnen. Wir fiigen hinzu: 


40 FOR x=1 TO 100 

5@ INPUT;" Name";NAMES(x) 
608 INPUT " Telefon";TEL$(x) 
70 NEXT 

run 


Schon und gut, aber vielleicht méchten wir nicht alle 100 Namen auf einmal 
eintragen. AuBerdem ist die Darstellung des Programms auf dem Bildschirm 
héchst unbefriedigend. Es mii%te ein wenig mehr Ordnung ins Bild gebracht 
werden. Zunachst einmal soll der Bildschirm von allem tiberfliissigen Text befreit 
werden, bevor wir einen neuen Namen mit Telefonnummer eingeben. Damit der 
Bildschirm nach jeder Eingabe geloscht wird, schreiben wir in unser Programm: 


45 CLS 


Wie sagen wir dem Computer, da3 wir mit der Eingabe von Informationen 
vorlaufig fertig sind? Wenn wir ({ESC]) driicken, wird das Programm zwar 
gestoppt, aber sobald wir dann wieder RUN eintippen, verlieren wir all die Werte 
unserer sorgfaltig eingegebenen Variablen! 


Stattdessen kénnen wir folgendes tun: Bevor das Programm einen neuen Namen 
aufnimmt, lassen wir den Computer prtifen, ob etwas fiir den Wert von 
NAME$(x) eingetippt wurde, mit anderen Worten, ob der Wert fiir NAMES (x) 
ein Leerstring ist oder nicht. Wenn (IF) das der Fall ist, dann (THEN) 
veranlassen wir das Programm, keine weiteren Informationen aufzunehmen. 
Haben Sie begriffen, wie wir das bewerkstelligen kénnen? Fiigen Sie hinzu: 


55 IF NAMES(x)=""" THEN 86 
80 PRINT "Keine weiteren Eingaben" 


Das Programm sagt Ihnen, wie die Eingabe beendet werden kann, wenn Sie 
hinzuftigen: 


47 PRINT "Druecke CRETURN] um Eingabe zu beenden" 


Der nachste Teil des Programms sol] bewirken, da die gespeicherte Information 
in Form einer Liste auf dem Bildschirm gezeigt wird. Figen Sie hinzu: 


90 FOR x=1 TO 100 ¥ 
108 PRINT NAMES (x);" ";TELS(x) 
118 NEXT 
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Wieder wei8 das Programm nicht, wie es aufhéren soll, bevor es das hundertste 
Element erreicht hat. Also fiigen wir hinzu: 


95 IF NAME$C(x)="" THEN 128 
120 PRINT “Ende der Liste" 


In Zeile 95 wird festgestellt, ob NAME$(x) ein Leerstring ist, und wenn (IF) 
dies der Fall] ist, dann (THEN) wird die Ausgabe beendet, indem die Zeilen 100 
und 119 tbergangen werden. 


Das Programm sollte noch mehr Méglichkeiten bieten, wie wir anfangs tiberlegt 
hatten. Wir wollen den Computer jetzt veranlassen, einen bestimmten Namen 
ausfindig zu machen, den wir eingegeben haben. Figen Sie hinzu: 


130 INPUT "suche";SUCH$ 

140 FOR x=1 TO 188 

150 IF INSTRCNAMES(x),SUCHS)=@ THEN 188 
168 PRINT NAMES(x);" ";TEL$(x) 

170 END 

180 NEXT 

198 PRINT "Name nicht gefunden" 

run 


mit dem Wert fiir SUCH$ (dies ist die Variable fiir den gesuchten Namen, die Sie 
in Zeile 13@ eingegeben haben) verglichen wird. Findet INSTR den Namen 
(oder einen Teil davon) nicht, gibt es den Wert 0 aus. In diesem Fall geht das 
Programm weiter zu Zeile 188 und versucht es mit dem nachsten Wert von x. Ist 
das Programm alle 100 Werte von x durchgegangen, geht es zu Zeile 198 und 
sagt Ihnen, daB es den Namen nicht gefunden hat. Hat es den Namen hingegen 
ausfindig gemacht, ergibt INSTR nicht den Wert 0. Dann riickt das Programm 
von Zeile 15@ zu 16@ und zeigt den Namen und die Telefonnummer an. Mit 
Zeile 17@ ENDet das Programm. 


Sie sehen, das sich unser Programm jetzt rasch entwickelt, aber es gibt noch viel 
zu tun. Wir wollen uns jetzt einen Moment lang zuriicklehnen und einige 
Nachteile dieses Programms betrachten. Beginnen wir mit der Abfolge des 
Programms: Erst tippen Sie die Information ein, dann erscheint eine Darstellung 
der Information auf dem Bildschirm, dann suchen Sie einen bestimmten Namen. 
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Was ist, wenn...? 


Und was ist, wenn Sie das Programm nicht in dieser Reihenfolge haben wollen? 
Was machen Sie, wenn Sie zuerst einen Namen suchen wollen, den Sie gestern 
abgespeichert haben? Und was machen Sie, wenn Sie weitere Namen und 
Telefonnummern hinzufiigen wollen? Uber all diese Fragen missen Sie 
nachdenken. Die Lésung solcher Probleme ist die eigentliche Aufgabe des 
Programmierers. Wie wir schon erwdhnt haben, ist BASIC eine Sprache, die es 
Ihnen freundlicherweise gestattet, nachtraglich etwas ins Programm einzufigen, 
aber ein guter Programmierer wird derartige Schwierigkeiten vorhersehen. 


Ein weiterer groBer Nachteil des Programms besteht darin, dai die Werte der 
Variablen in den Arrays alle in einem Teil des Computers gespeichert sind, der 
geléscht ist, wenn Sie das Programm laufen lassen. Sie méchten natirlich nicht 
jedesma! die gesamte Information eintippen, wenn Sie das Programm benutzen. 


Sie mtssen also die Méglichkeit haben, die Werte aller NAMES$-und 
TEL$-Variablen zu speichern, bevor Sie den Computer abschalten, und 
umgekehrt miissen Sie die Méglichkeit haben, den Computer mit den Werten der 
Variablen zu laden, wenn Sie das Programm starten wollen. 


Losungen 


Um das erstgenannte Problem zu lésen (die Reihenfolge), miissen Sie das 
Programm so schreiben, das es die verschiedenen Funktionen nach Ihrer Wahl 
ausfiihrt. Diese Art von Programm wird mit dem etwas irrefiihrenden Wort 
‘Meni’ bezeichnet. (Das englische Wort ‘menu’ bedeutet ‘Speisekarte’. Ein Meni 
wird also wie eine Speisekarte auf dem Bildschirm prasentiert, aus der Sie das 
Gewtinschte auswahlen.) Wenn Sie schon einmal einen Geldautomaten an einem 
Bankgebaude bedient haben, haben Sie bereits mit einem meniigesteuerten 
Programm gearbeitet! Wir bauen jetzt ein Meni in unser Programm ein: 


32 PRINT "1. Information eingeben" 
33 PRINT "2. Information auflisten" 
34 PRINT "3. Suchen" 

35 PRINT "4. Information speichern" 
36 PRINT "5. Information laden" 

37 INPUT "Menu-Auswahl";ms 

38 ON ms GOSUB 40,968,130 


85 RETURN 
125 RETURN 
178 RETURN 
208 RETURN 
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Wir haben also zunadchst die Wahlméglichkeiten auffiihren lassen, dann die 
Auswahl eingegeben (INPUT) und sie in der Variablen ms abgelegt. Das 
Kommando ON ms GOSUB in Zeile 38 sagt dem Programm, da es zur ersten 
Zeilennummer des Unterprogramms (sog. Subroutine), in diesem Fall zu Zeile 40 
gehen soll, wenn ms gleich 1 ist. Wenn ms gleich 2 ist, soll es zur zweiten 
Zeilennummer der Subroutine gehen usw. 


Da nun jede der einzelnen Programmfunktionen eine Subroutine darstellt, die 
durch das Kommando ON ms GOSUB aufgerufen werden kann, mu hinter jeder 
Funktion das Kommando RETURN stehen. Die RETURN-Befehle wurden folglich 
oben erganzt. 


Erinnern Sie sich noch, was nach dem Befehl RETURN geschieht? Das Programm 
kehrt von der Subroutine zu der Stelle zuriick, die auf das zuletzt befolgte 
GOSUB-Kommando folgt. In vorliegenden Fall kehrt es zu der Anweisung zuriick, 
die auf Zeile 38 folgt, dh. es geht zu Zeile 40, dem Punkt, an dem die 
Information eingegeben wird. Damit sind wir jedoch nicht einverstanden, also 
fiigen wir hinzu: 


39 GOTO 32 


Das Programm macht nun eine Schleife und zeigt noch einmal das Meni an. 
Lassen Sie das Programm jetzt noch einmal durchlaufen (Kommando RUN), um 
zu sehen, wie weit wir vorangekommen sind. 


Sehen wir uns also einen Moment lang das Listing des Programms an. (Wenn das 
Programm noch lauft, driicken Sie zweimal die [ESC]-Taste.) Schreiben Sie nun: 


LIST 
Sie sollten folgendes Bild vor sich haben: 


10 REM Telefonbuch 

20 DIM NAMES$( 180) 

3@ DIM TEL$( 100) 

32 PRINT '1. Information eingeben" 
33 PRINT "2. Information auflisten" 
34 PRINT "3. Suchen" 

35 PRINT "4. Information speichern" 
36 PRINT "5. Information laden" 

37 INPUT "“Menu-Auswahl";ms 

38 ON ms GOSUB 40,998,138 


39 GOTO 32 
40 FOR x=1 TO 106 
45 CLS 


47 PRINT "Druecke RETURN um Eingabe zu beenden" 
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5@ INPUT ;" Name";NAMES(x) 


55 IF NAMES(x)="" THEN 80 

6@ INPUT " Telefon";TEL$(x) 

70 NEXT 

8@ PRINT "keine weiteren Eingaben" 
85 RETURN 

96 FOR x=1 TO 1080 

95 IF NAMES(x)="" THEN 128 

100 PRINT NAMES(x);" ";TELS(x) 
118 NEXT 

12@ PRINT "Ende der Liste" 

125 RETURN 


13@ INPUT "“Suche";SUCH$ 

140 FOR x=1 TO 100 

150 IF INSTR(NAMES(x),SUCHS)=@ THEN 180 
160 PRINT NAMES(x);" "ZS TELSC(x) 

178 RETURN 

180 NEXT 

198 PRINT “Name nicht gefunden” 

28008 RETURN 


Sie werden bemerkt haben, da in manchen Teilen des Programms der Platz 
knapp wird, um weitere Anweisungen einzufiigen. Wir schaffen uns einfach mehr 
Platz und Ordnung, indem wir die Zeilen neu numerieren. Schreiben Sie: 


RENUM 
LIST 


Jetzt muBte die Numerierung folgendermaffen aussehen: 


10 REM Telefonbuch 

20 DIM NAMES( 106) 

36 DIM TEL$(100) 

40 PRINT 1. "Information eingeben" 
5@ PRINT 2. “Information auflisten" 
60 PRINT 3. "Suchen" 

70 PRINT 4. "Information speichern" 
80 PRINT 5. "Information laden" 

90 INPUT '"Menu-Auswahl";ms 

186 ON ms GOSUB 128,218,270 


118 GOTO 48 
120 FOR x=1 TO 1080 
138 CLS 


14@ PRINT “Druecke CRETURN] um Eingabe zu beenden" 
150 INPUT;" Name";NAMES(x) 
160 IF NAMES(x)="" THEN 198 
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17@ INPUT " Telefon";TEL$(x) 


180 NEXT 

198 PRINT "keine weiteren Eingaben" 
208 RETURN 

218 FOR x=1 TO 1098 

228 IF NAMES(x)="" THEN 256 

230 PRINT NAME$S(x);" "“;TEL$S(x) 

240 NEXT 

25@ PRINT “Ende der Liste" 

260 RETURN 


278 INPUT "Suche'";SUCHS$ 

280 FOR x=1 TO 100 

298 IF INSTRCNAMES(x),SUCHS)=@ THEN 326 
300 PRINT NAMESC(x);" "ZSTELSCx) 

318 RETURN 

320 NEXT 

330 PRINT "Name nicht gefunden" 

340 RETURN 


Das sieht schon besser aus. Doch nun weiter im Programm. Als nachstes fiigen 
wir eine Anweisung hinzu, die bewirkt, daB neue Namen und Telefonnummern, 
die Sie erganzen wollen, in das erste freie Element des Arrays eingeordnet 
werden. Dieses Mal verwenden wir das neue Kommando LEN (engl. length), um 
die Lange einer Zeichenfolge zu bestimmen. Wir wollen also folgendes 
ausdrticken: 


Wenn (IF) die Lange (LEN) des Namens (NAME$(x)) gréBer als 0 ist, mit 
anderen Worten, wenn schon ein Name in diesem Element des Arrays 
eingetragen ist, dann (THEN) springe zu Zeile 18@ (die zur nachsten (NEXT) 
Zeile im Array fiihrt). 


Wieder sehen Sie, wie nah sich BASIC am Englischen orientiert. Es ist 
wahrhaftig keine neue Fremdsprache! Die Anweisung lautet: 


135 IF LENCNAMES(x))>@ THEN 180 


So einfach ist die Loésung! Mit Ihrem BASIC-Wortschatz und ein wenig 
Uberlegung kénnen Sie solche Probleme immer schnell lésen. Es ist fast immer 
mindestens ein Befehl vorhanden, mit dem Sie Schwierigkeiten beim 
Programmieren meistern kénnen. Und je mehr Sie programmieren, um so leichter 
werden Ihnen Lésungen einfallen. 


Unser nachstes Anliegen war, den Inhalt der Variablen zu sichern, wahrend das 
Programm lauft. In Teil 7 der Einfiuhrung wurde erklart, wie man das Programm 
selbst, unter Verwendung des Kommandos SAVE, speichert. Aber das Programm 
stellt nur den Rahmen dar, mit dessen Hilfe die Variablenwerte eingetippt und 
uber den Bildschirm abgerufen werden kénnen. Wenn man das Programm 
speichert, speichert man nur den Rahmen, nicht aber die Werte der Variablen. 
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Deshalb miissen wir einen Programmteil schreiben, der die Werte der Variablen 
auf einer Diskette speichert. Dazu schaffen wir eine spezielle Datei. Zunachst 
eréffnen wir die Datei (Kommando: OPENOUT) und geben ihr einen Namen, 
sagen wir ‘Datei’. Dann schreiben (WRITE) wir die Werte der Variablen 
NAMES(x) und TEL$(x) von 1 bis 100 in die Datei. Danach schlieBen wir die 
Datei mit dem Kommando CLOSEOUT und kehren mit [RETURN] zum Ment 
zuruck. Diesen Programmteil wollen wir jetzt ab Zeile 35@ erganzen. Damit wir 
nicht in jeder neuen Zeile die Nummer eintippen miissen, arbeiten wir mit dem 
Befehl 


AUTO 35@ 
So werden die Zeilen ab 35@ AUT Omatisch numeriert: 


35@ OPENOUT "Datei" 

360 FOR x=1 TO 100 

37@ WRITE #9,NAMES(x),TELS$(x) 
388 NEXT 

398 CLOSEOUT 

400 PRINT "Datei gespeichert" 
418 RETURN 


Wenn Sie die Zeile 41@ getippt und die [RETURN]-Taste gedriickt haben, 
driicken Sie [ESC], um die automatische Numerierung abzubrechen. 


Wir haben jetzt unser Menii um eine weitere Auswahlméglichkeit bereichert und 
miissen daher die Zahlenfolge in dem Befehl ON ms GOSUB in Zeile 100 
erganzen. Sie EDI Tieren also Zeile 18@ und erhalten folgendes Bild: 


108 ON ms GOSUB 120,210,276,350 


Jetzt wird jedesmal, wenn Sie die vierte Méglichkeit aus dem Menii wahlen, die 
Information, die Sie eingegeben haben, auf Diskette gespeichert. 


Sie haben bemerkt, da8 in Zeile 378, wo das Programm die Werte der Variablen 
NAMES und TEL$ auf die Diskette schreibt (WRITE), nach dem Wort WRITE 
der Ausdruck #9 erscheint. Das Zeichen # sagt dem Computer, welchem ‘Stream’ 
er die Daten zuordnen soll. Der Computer hat 10 Streams. 


Wenn er die Daten zu den Streams 0 bis 7 (#0 bis #7) schickt, erscheinen sie auf 
dem Bildschirm, da die Streams #@ bis #7 Bildschirm-Streams (auch Fenster 
oder WINDOWs genannt) darstellen. 


Uber Stream #8 werden die Daten zum Drucker geschickt, falls einer 
angeschlossen ist. 


Daten, die zum Stream #9 gelenkt werden, wie wir es in Zeile 379 getan haben, 
landen im Diskettenlaufwerk. 
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Kleine Randbemerkung 


An dieser Stelle soll noch etwas zum Kommando AUTO gesagt werden, das wir 
eben verwendet haben. Wenn Sie die Zeilennummer auslassen und lediglich 
schreiben: 


AUTO 


wird der Computer die Zeilenumerierung mit 10 beginnen und nach jedem [- 
RETURN] 1@ Nummern weitergehen. Wenn Sie vorher schon die Nummern 19, 
20, 30 usw. benutzt haben, erscheint nach jedem [RETURN] automatisch der 
Inhalt der Zeilen 10, 28, 38 usw. auf dem Bildschirm und kann editiert werden. 
Auf diese Weise wird das Editieren von aufeinanderfolgenden Zeilen mit gleichem 
Zeilennummernabstand erleichtert. 


Zuruck zum Programm 


Wir haben also Anweisungen gegeben, damit die Information auf Diskette 
gespeichert werden kann. Mit dem letzten Hauptteil des Programms sollen die 
Daten von der Diskette wieder zum Gebrauch bereitgestellt (geladen) werden. 
Wir miissen also die Menii-Auswahl in Zeile 100 wieder um eine Zahl erweitern. 
Editieren Sie Zeile 100 wie folgt: 


100 ON ms GOSUB 1286,218,270,358,428 


Wie sieht nun die Anweisung zum Laden der Information aus? Zunachst eréffnen 
wir die Datei auf der Diskette, die wir ‘Datei’ genannt haben, mit dem Befeh] 
OPENIN. Dann laden wir alle Werte fir die Variablen NAMESC(X) und 
TEL$(x) von 1 bis 100 von der Diskette (Stream #9) in den Computer 
(INPUT). Danach schliefen wir die Datei (CLOSEIN) und kehren zum Menti 
zuruck [RETURN]. Geben Sie also folgende Answeisungen ein: 


426 OPENIN "Datei" 

430 FOR x=1 TO 180 

446 INPUT #9,NAME$(x),TELS(x) 
45@ NEXT 

468 CLOSEIN 

470 PRINT "Datei geladen" 

48@ RETURN 
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Das Ende vom Anfang 


Jetzt haben wir ein Programm geschrieben, das all die Funktionen erfiillt, die wir 
zur Verfiigung haben wollten, als wir tberlegten, ‘welche Méglichkeiten das 
Programm bieten soll’. Bleibt uns nur noch, die ‘Darstellung der Ergebnisse auf 
dem Bildschirm’ zu verbessern. 


Der Anfang vom Ende 


Fugen wir also einige Anweisungen hinzu, um die Darstellung des Programms zu 
verschonern. 


34 MODE 1 


So wird der Bildschirmmodus festgelegt und der Bildschirm am Anfang des 
Programms geléscht. Fiigen Sie hinzu: 


36 WINDOW #1,9,34,10,14 


Lassen Sie sich durch diese scheinbar schwierige Anweisung nicht verwirren. Wir 
schaffen dadurch lediglich ein kleines Fenster auf dem Bildschirm fiir unser 
Menti. Nach dem Wort ‘WINDOW’ geben wir an, welcher Stream-Nummer das 
Fenster zugeordnet werden soll. (Sie erinnern sich, da8 wir 8 Fenster von #0 bis 
#7 zur Verfiigung haben.) Da wir wissen, da alle Angaben auf dem Bildschirm 
tiber Stream #@ laufen, wenn nichts anderes angegeben ist, werden wir fiir unser 
kleines Fenster nicht Stream #8 in Anspruch nehmen, sonst wird alles, was das 
Programm auf den Bildschirm bringt, in unserem Fenster erscheinen. Deshalb 
geben wir einen anderen Stream zwischen #1 und #7 an. Wir haben Stream #1 
gewahlt. Die vier Zahlen nach #1 teilen dem Computer die gewiinschte GréBe des 
Fensters mit. Die Nummern bestimmen die Begrenzung des Fensters nach links, 
rechts, oben und unten. Sie beziehen sich auf Textspalten und Zeilennummern 
(genauso wie beim LOCATE-Befehl). In unserem Beispiel bestimmen wir also 
(nachdem wir angegeben haben, da8 wir Stream #1 benutzen wollen), daB das 
Fenster von Spalte 13 bis Spalte 30 reicht, und da8 es oben von Zeile 18 und 
unten von Zeile 14 begrenzt wird. 


Damit nun alle Wahlméglichkeiten des Meniis auf dem Bildschirm in Fenster #1 
erscheinen, mtissen wir die Zeilen 48 bis 88 wie folgt editieren: 


40 PRINT #1,"1. Information eingeben" 
5@ PRINT #1,"2. Information auflisten" 
60 PRINT #1,"3. Suchen" 

70 PRINT 41,"4. Information speichern" 
80 PRINT #1,"5. Information laden" 
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Nun fiigen wir hinzu: 
85 LOCATE 7,25 


Auf diese Weise wird die INPUT-Anweisung des Meniis in Zeile 98 so 
positioniert, da8 es ordentlicher aussieht. 


Damit der Bildschirm immer frei ist, wenn Sie etwas aus dem Ment wahlen, 
fiigen Sie hinzu: 


95 CLS 


Zu guter Letzt hangen wir noch die folgenden 3 Zeilen an, damit das Programm 
eine Pause macht, bevor es zum Ment zuriickkehrt: 


183 LOCATE 9,25 
185 PRINT "Mit beliebiger Taste ins Menu" 
107 IF INKEY$=""" THEN 187 


Zeile 183 sagt dem Computer, an welche Stelle er die Mitteilung aus Zeile 105 
setzen soll. Zeile 187 fragt die Tastatur, welche Zeichenfolge eingegeben wird 
(indem eine Taste gedriickt wird). Wenn es entdeckt, daS ein Leerstring 
eingegeben wurde (weil keine Taste gedriickt wurde), kehrt das Programm in 
einer Schleife solange zur selben Anweisung zuriick, bis INKEY$ einen String 
findet, d.h. bis eine Taste gedrtickt wurde. Dies ist eine wirkungsvolle Art, eine 
Pause ins Programm einzubauen. BASIC wird jetzt erst zur nachsten Zeile 
vorgehen, wenn irgendeine Taste gedrtickt wird. 


Nun haben wir das fertige Programm also vor uns. Oder fehlt noch etwas? Nun, 
Sie kénnten es noch mit verschiedenen anderen Fahigkeiten ausstatten: Namen 
und Telefonnummern zu Andern oder zu léschen, die Liste in alphabetische 
Reihenfolge zu bringen oder sie auszudrucken. All diese Erweiterungen des 
Programms sind machbar. Eigentlich kénnen Sie ein Programm immer weiter 
verbessern und straffen, besonders wenn Sie einen Computer mit solch 
vielfaltigen Méglichkeiten wie dem 6128 besitzen. Wir miissen notgedrungen 
irgendwo eine Grenze setzen, und deshalb verlassen wir jetzt unser “‘Telefonbuch’ 
in der Hoffnung, daB wir Ihnen das eine oder andere itber die Kunst, ein 
Programm aufzubauen, nahebringen konnten. Gestalten Sie die Numerierung 
noch etwas tibersichtlicher, indem Sie 


RENUM 
eintippen und dann speichern Sie das Programm auf Diskette oder léschen es. 


Doch nicht zu voreilig - es kénnte Ihnen noch gute Dienste leisten, wenn Sie die 
Namen und Telefonnummern lhrer Freunde speichern wollen. 
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18 REM Telefonbuch 

26 DIM NAMES( 1080) 

36 DIM TEL$(100) 

40 MODE 1 

5Q0 WINDOW #1,9,34,10,14 

6@ PRINT #1,"1. Information eingeben" 
70 PRINT #1,"2. Information auflisten" 
86 PRINT #1,"3. Suche" 

96 PRINT #1,"4. Information speichern" 
160 PRINT #1,"5. Information laden" 
1186 LOCATE 7,25 

120 INPUT "Menu-Auswahl";ms 

1308 CLS 

140 ON ms GOSUB 198,298,350,430,5008 
15@ LOCATE 9,25 

16@ PRINT "Mit beliebiger Taste ins Menu" 
176 IF INKEY$S=""" THEN 178 


188 GOTO 46 
198 FOR x=1 TO 108 
208 CLS 


210 IF LENCNAMES(x))>@ THEN 260 
220 PRINT "druecke CRETURN] um Eingabe zu beenden" 
238 INPUT;" Name";NAMES$(x) 


240 IF NAMES(x)="" THEN 276 
258 INPUT " Telefon";TEL$(x) 
266 NEXT 

278 PRINT “keine weiteren Eingaben"” 
288 RETURN 

2908 FOR x=1 TO 1840 

306 IF NAMES(x)="" THEN 330 
310 PRINT NAME$(x);" "ZTELSC(x) 
326 NEXT 

33@ PRINT “Ende der Liste" 

340 RETURN 


35@ INPUT "Suche"; SUCHS 

360 FOR x=1 TO 108 

378 IF INSTR(NAMES(x),SUCH$S)=68 THEN 468 
380 PRINT NAMES(x);" ";TEL$(Xx) 
398 RETURN 

400 NEXT 

410 PRINT "Name nicht gefunden" 
420 RETURN 

430 OPENOUT "Datei" 

440 FOR x=1 TO 100 

456 WRITE #9,NAME$(x),TELS(x) 
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Kapitel 3 Liste aller Befehle des 
Schneider CPC 6128 BASIC 


Wichtiger Hinweis 


Es ist unbedingt erforderlich, daB Sie die in diesem Kapitel 
verwendete Terminologie und Notation kennen. Bei der 
Erklarung der Schreibweise der einzelnen Befehle tauchen 
verschiedene Arten von Klammern auf, die jeweils ihre eigene 
Bedeutung haben. Achten Sie also darauf, welche Klammer 
verwendet wird! 


Jeder Teil eines Befehls, der nicht in Klammern steht, mu wie angegeben 
eingetippt werden. Der Befeh] END z.B. sieht folgendermaSen aus: 


END 
Sie mtissen also das Wort END Buchstabe fiir Buchstabe eintippen. 
Wenn ein Ausdruck in spitzen Klammern ~ steht, z.B.: 

Zeilennummer> 
..brauchen Sie weder die spitzen Klammern, noch das, was in den Klammern 
steht, einzutippen. Im obigen Beispiel wird lediglich angezeigt, welcher Datentyp 
in dem Befehl eingesetzt werden soll. Fir: 

EDIT .Zeilennummer> 
..tippen Sie also z.B.: 

EDIT 108 


ein, 


Runde Klammern () miissen mit angegeben werden. Heift es z.B.: 


COS (.numerischer Ausdruck ) 
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... so mu8 die Zahl, deren COSinus gefragt ist, in runden Klammern stehen, etwa 
so: 


PRINT COS(45) 


Eckige Klammern [] besagen, da8 die darin eingeschlossene Angabe dem Befehl 
wahlweise hinzugefiigt werden kann. 


RUN [-Zeilennummer ] 


z.B. bedeutet, da8 der Befehl RUN nicht durch einen Parameter erganzt werden 
mu8, da Sie jedoch die Méglichkeit haben, ihn durch den Parameter 
Zeilennummer> zu erweitern. Der Befeh] kénnte entweder als: 


RUN ...oder als: RUN 10@ 


..eingegeben werden. 


Sonderzeichen 


& oder &H kennzeichnet die nachfolgende Konstante als hexadezimal (sedezimal) 
&X kennzeichnet die nachfolgende Konstante als binar (dual) 
# kennzeichnet die Ein-/Ausgabeeinheit (Stream) 


Datentypen 


Zeichenfolgen (Strings) kénnen 0 bis 255 Zeichen lang sein. Ein «Textausdruck> 
ist ein Ausdruck, der den Wert einer Zeichenfolge wiedergibt. Zeichenfolgen 
koénnen mit einem ‘+’-Zeichen aneinandergehangt werden. Dabei darf ihre 
Gesamtlange 255 Zeichen nicht tiberschreiten. 


Ein numerischer Ausdruck> kann entweder ganzzahlig oder reell sein, d.h. die 
Zahlenwerte werden ohne bzw. mit Dezimalpunkt dargestellt. Ein <ganzzahliger 
Ausdruck» kann die Werte von -32768 bis -32767 annehmen. Ein -reeller 
Ausdruck> kann im Bereich von -1.7E+38 bis +1.7E+38 liegen (E bedeutet ’mal 
10 hoch’). Reelle Gré8en haben eine Genauigkeit von etwas tber neun Stellen. 
Die kleinste nahe 0 darstellbare Zahl ist 2.9E-39. 


Ein «numerischer Ausdruck» hat immer einen Zahlenwert als Ergebnis. Dabei 
kann es sich um eine echte Zahlenangabe, eine Variable (ganzzahlig oder reell) 
oder einen mathematischen Ausdruck handeln. Kurz, alles was keinen 
‘Textausdruck> darstellt, fallt in diese Kategorie. 
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Die <Kin-/Ausgabeeinheit> (.Stream-Ausdruck>) stellt einen <numerischen 
Ausdruck> dar, der das Textfenster, den Drucker oder die Diskette bezeichnet. 


‘Liste von:EKinheit> bezeichnet einen Parameter, der eine Liste von 
Dateneinheiten enthalt, die durch Kommata getrennt werden. Die Liste kann 
eine oder beliebig viele Einheiten umfassen, soweit es die Zeilenlange (= 255 
Zeichen) erlaubt. 


Durch ein Typenkennzeichen hinter dem Variablennamen wird die Art des 
Ausdrucks gekennzeichnet. Dabei bedeutet: 


%  ganzzahlig 

! reel] (alle Variablen werden als reelle Zahlen angesehen, wenn 
kein Typenzeichen angegeben ist.) 

$ String (Zeichenfolge) 


Bitte beachten Sie, dal} alle Schneider CPC 6128 BASIC-Befehlsbeschreibungen 
folgendermafen aufgebaut sind: 


BEFEHL 


Befehlsschreibweise (Syntax) 
Beispiel 
Beschreibung 


Verwandte Befehle 


Befehle sind entweder: 


KOMMANDOS, die sofort ausgefiihrt werden, oder 
FUNKTIONEN, die den Wert eines Ausdrucks berechnen, oder 
OPERATOREN, die logische Verkniipfungen herstellen. 


BASIC wandelt alle mit kleinen Buchstaben eingegebenen Befehle in 
Grofbuchstaben um, wenn das Programm aufgeL1STet wird. Wenn Sie die 
Befehle mit kleinen Buchstaben eingeben, kénnen Sie eventuelle Tippfehler 
leichter finden, da dann alle falschgeschriebenen Befehle bei der Auflistung 
weiterhin in Kleinschreibung erscheinen. In den verwendeten Beispielen sind alle 
Befehle mit GroBbuchstaben geschrieben. 
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BEFEHLE: 


ABS 
ABS (.numerischer Ausdruck> ) 


PRINT ABS(-67.98) 
67.98 


FUNKTION: Gibt den ABSoluten Wert des angegebenen Ausdrucks zuriick, d.h. 
negative Zahlen werden in positive verwandelt. 


Verwandte Befehle: SGN 


AFTER 
AFTER <Intervall [,:Zeitgebernummer>] GOSUB <:Zeilennummer> 


10 AFTER 258 GOSUB 66@:CLS 

2@ PRINT "Rate einen Buchstaben in 5 Sekunden" 
3@ aS=INKEY$:IF Signal=1 THEN END 

40 IF a$<>CHRSCINTCRND*26+97)) THEN 30 

5@ PRINT a$;" ist richtig. Du hast gewonnen" 
55 SOUND 1,478:SOUND 1,358:END 

6@ PRINT "Zu spaet. Ich habe gewonnen" 

78 SOUND 1,28000:Signal=1:RETURN 


KOMMANDO: Ruft nach einem bestimmten Zeitabschnitt ein BASIC- 
Unterprogramm auf. Der <Intervall» Parameter gibt das eeiumerwall in Einhei- 
ten zu 0,02 Sekunden (Ftinfzigstelsekunden) an. 


Die :Zeitgebernummer> bestimmt, welcher der vier méglichen Zeitgeber ( 0, 1, 2 
oder 3) verwendet werden soll. Zeitgeber 3 hat die héchste, Zeitgeber 0 die 
niedrigste Prioritat. 


Jeder Zeitgeber kann mit einem anderen Unterprogramm verbunden sein. 


Weitere Informationen tber Unterbrechungen finden Sie im 2.Teil von Kapitel 9. 


Verwandte Befehle: EVERY, REMAIN, RETURN 
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AND 
<Aussager AND <Aussage> 


IF "Anna'<"Berta"™ AND "Hund">"Katze" THEN PRINT "richt 
ig" ELSE PRINT "falsch" 

richtig 

IF "Berta"<"Anna" AND "Katze">"Hund' THEN PRINT "richt 
ig" ELSE PRINT "falsch" 

falsch 

IF "Anna"<"Berta”™ AND "Katze">"Hund' THEN PRINT "richt 
ig" ELSE PRINT "falsch" 

falsch 


PRINT 1 AND 14 
1 

PRINT @ AND @ 
1) 

PRINT 1 AND @ 
V7) 


OPERATOR: Fihrt Bit fiir Bit Boolesche Vergleichsoperationen mit ganzen 
Zahlen durch. Das Ergebnis ist @, es sei denn, beide Aussagen entsprechen 1. 


Weitere Informationen tiber Logik finden Sie im 2.Teil von Kapitel 9. 


Verwandte Befehle: OR, NOT, XOR 


ASC 
ASC (-Textausdruck> ) 


PRINT ASC("x") 
126 


FUNKTION: Gibt den numerischen Wert des ersten Zeichens im:Textausdruck> 
wieder. 


Verwandte Befehle: CHR$ 
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ATN 


ATN (.numerischer Ausdruck> ) 


PRINT ATN(1) 
» 785398163 
FUNKTION: Berechnet den ArcusTaNgens des .numerischen Ausdrucks>. 


Mit den Befehlen DEG und RAD kann das Ergebnis der obigen Berechnung in 
Winkelgraden bzw. im BogenmaS ausgedriickt werden. 


Verwandte Befehle: COS, DEG, RAD, SIN, TAN 


AUTO 
AUTO [-:Zeilennummer |[ , ‘Schrittweite | 
AUTO 100,50 


KOMMANDO: Numeriert die Zeilen AUTOmatisch. Der wahlweise anzugebende 
Zeilennummer>-Parameter nennt die erste Zeilennummer, mit der begonnen 
wird, falls die Numerierung erst ab einem bestimmten Punkt im Programm 
gewunscht wird. Wird der Parameter nicht angegeben, beginnen die 
Zeilennummern mit 19. 


Die <Schrittweite» bestimmt die Differenz zur nachsten Zeilennummer. Wird sie 
nicht angegeben, so wird als Standardwert 1@ angenommen. 


Falls eine Zeile mit derselben Nummer schon vorhanden ist, erscheint der Inhalt 
dieser Zeile auf dem Bildschirm und kann bei Bedarf geandert werden. Mit dem 
Driicken der [RETURN]-Taste wird die gezeigte (und eventuell geanderte) Zeile 
gespeichert. 


Ein Druck auf die [ESC]-Taste beendet die automatische Numerierung. 


Verwandte Befehle: keine 
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BINS 
BINS (.vorzeichenloser ganzzahliger Ausdruck>| , Feldbreite>]) 


PRINT BINS(64,8) 
01000000 


FUNKTION: Gibt den Wert des -vorzeichenlosen ganzzahligen Ausdrucks> in 
BINarer Form wieder. Die <Feldbreite. (zwischen 0 und 16) gibt an, wieviele 
Binarstellen verwendet werden sollen. Ist die Anzahl der tatsachlich bendtigten 
Stellen kleiner als vorgeschrieben, so werden dem Ergebnis Nullen vorangestellt. 
Ist sie groBer als vorgeschrieben, so wird das Ergebnis NICHT gekurzt, sondern 
in sovielen Ziffern ausgegeben, wie benotigt werden. 


Der Wert des -vorzeichenlosen ganzzahligen Ausdrucks,, der in Binarform 
umgewandelt werden soll, mu8 zwischen —32768 und +65535 liegen. 


Verwandte Befehle: DEC$, HEXS, STRS 


BORDER 
BORDER -Farbe [,:Farbe: | 


10 REM 729 Randfarben-Kombinationen 
206 SPEED INK 5,5 

30 FOR a=@ TO 26 

48 FOR b=@ TO 26 

5@ BORDER a,b:CLS:LOCATE 14,13 

6@ PRINT “Rand";a;",";b 

70 FOR t=1 TO 580 

80 NEXT t,b,a 


KOMMANDO: Die nicht beschreibbare Randflache des Bildschirms (engl. border) 
wird in der angegebenen -Farbe> dargestellt. Wird eine zweite ‘Farbe angegeben, 
so wechseln sich die beiden Farben mit der im SPEED INK-Befehl angegebenen 
Geschwindigkeit ab. .Farbe> darf Werte von 0 bis 26 haben. 


Verwandte Befehle: SPEED INK 


BREAK 


(Siehe ON BREAK CONT, ON BREAK GOSUB, ON BREAK STOP) 
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CALL 
CALL «Adressausdruck [, «Liste von::Parameter | 
CALL @ 


KOMMANDO: Springt in ein Unterprogramm auferhalb des BASIC-Bereiches, 
das an der angegebenen Speicheradresse beginnt. In unserem Beispiel wird der 
Computer durch diesen Befehl ganz zurtickgesetzt. 


Dieser Befehl sollte mit Vorsicht angewendet werden. 


Verwandte Befehle: UNT 


CAT 


CAT 


KOMMANDO: Zeigt das Inhaltsverzeichnis (engl. catalogue) einer Diskette in 
alphanumerischer Reihenfolge auf dem Bildschirm. Dabei wird aufer der Lange 
der einzelnen Dateien (zum nachsthéheren KByte aufgerundet) der Umfang des 
freien Speicherplatzes auf der Diskette angegeben. Uber dem Verzeichnis wird 
das Laufwerk (Drive) und die Benutzer-Nummer (User) angegeben. 


Der Befehl hat keine Auswirkungen auf das augenblicklich im Speicher 
befindliche Programm. 


Verwandte Befehle: LOAD, RUN, SAVE 


CHAIN 


CHAIN .Dateiname: [ ,:Zeilennummer |] 
CHAIN “Testprog.bas",350 


KOMMANDO: Ladt ein Programm von der Diskette in den Speicher, wobei das 
gerade im Speicher befindliche Programm geléscht wird. Das neue Programm 
wird gleich gestartet, entweder von vorn, oder ab der angegebenen 
<Zeilennummer>. 


Der Befehl kann verwendet werden, um geschiitzte Programme, (die mit ,p 
gesichert wurden) zu laden und laufen zu lassen. 


Verwandte Befehle: CHAIN MERGE, LOAD, MERGE 
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CHAIN MERGE 


CHAIN MERGE -<Dateiname)[ ,:Zeilennummer | 
[,DELETE -Zeilenbereich>} 


CHAIN MERGE "Neuprogr.bas",75@,DELETE 480-680 


KOMMANDO: Ladt ein Programm von der Diskette in den Speicher und figt es 
in das gegenwartig im Speicher befindliche Programm ein. Das auf diese Weise 
neu entstandene Programm wird gleich gestartet, entweder von vorn, oder ab der 
angegebenen :Zeilennummer>. Mit DELETE -Zeilenbereich» wird der angegebene 
Bereich des Original-Programms vor dem Laden geléscht, falls erforderlich. 


Beachten Sie, daB Zeilen des alten Programms von Zeilen des einzufiigenden 
Programms tiberschrieben werden, wenn sie dieselbe Zeilennummer aufweisen. 


Geschiitzte Programme, die durch ‘,P’ gesichert wurden, konnen NICHT mit 
diesem Befehl geladen werden. 


Verwandte Befehle: CHAIN, DELETE, LOAD, MERGE 


CHR$ 
CHR$ (<ganzzahliger Ausdruck> ) 


18 FOR x=32 TO 255 
2@ PRINT x;CHR$(x) 
30 NEXT 

run 


FUNKTION: Wandelt einen -ganzzahligen Ausdruck» zwischen 0 und 255 
entsprechend der Schneider-Zeichentabelle (siehe Kapitel 7, Teil 3) in eine 
Zeichenfolge (engl. C HaRacter String) um. 


Die Zahlen 0 bis 31 stellen Kontrollzeichen dar. Im obigen Beispiel steht daher 
fiir x eine Zahl zwischen 32 und 255. 


Verwandte Befehle: ASC 
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CINT 
CINT (.numerischer Ausdruck> ) 


10 n=1.9999 

20 PRINT CINT(n) 
run 

2 


FUNKTION: Rundet den -numerischen Ausdruck» im Wertebereich von —32768 
bis +32767 zu einer ganzen Zahl (engl. Convert to INTeger). 


Verwandte Befehle: CREAL, FIX, INT, ROUND, UNT 


CLEAR 
CLEAR 
CLEAR 


KOMMANDO: Setzt alle Variablen auf Null, vergiBt alle offenen Dateien, Arrays 
und Anwenderfunktionen. BASIC wird auf Bogenmak-Ausgabe gesetzt. 


Verwandte Befehle: keine 


CLEAR INPUT 
CLEAR INPUT 


1@ CLS 

2@ PRINT “Gib Buchstaben ein!" 
30 FOR t=1 TO 3008 

40 NEXT 

5@ CLEAR INPUT 


KOMMANDO: Entledigt sich aller vorher eingetippten INPUT-Informationen, 
die noch im Tastatur-Puffer liegen. 


Die Wirkung dieses Befehls sehen Sie am besten, wenn Sie das oben angegebene 
Programm laufen lassen und Buchstaben eingeben, wenn der Computer Sie dazu 
auffordert. Streichen Sie dann Zeile 5@ und lassen Sie das Programm nochmals 
laufen. 


Verwandte Befehle: INKEY, INKEY$S, JOY 
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CLG 
CLG [-Farbstift: | 


LOCATE 1,20 
CLG 3 


KOMMANDO: Léscht den Graphik-Bildschirm und fillt ihn mit der dem 
‘Farbstift> (INK) zugeordneten Farbe. Ist kein <Farbstift» angegeben, wird der im 
letzten C LG-Befehl bestimmte :Farbstift» verwendet. 


Verwandte Befehle: CLS, GRAPHICS PAPER, INK, ORIGIN 


CLOSEIN 
CLOSEIN 
CLOSEIN 
KOMMANDO: SchlieBt Eingabe einer Datei von der Diskette. 
Verwandte Befehle: EOF, OPENIN 


CLOSEOUT 
CLOSEOUT 
CLOSEOUT 


KOMMANDO: SchlieBt die Ausgabe einer Datei auf die Diskette (siehe 
OPENOUT). 


Verwandte Befehle: OPENOUT 


CLS 
CLS [#-Stream-Ausdruck> | 


10 PAPER#2,3 
20 CLS#2 
run 


KOMMANDO: Léscht den angegebenen Bildschirmbereich und fillt ihn mit der 
Farbe des im PAPER-Befehl festgelegten Farbstifts. Ist kein Stream angegeben, 
wird der ganze Bildschirm geloscht. 


Verwandte Befehle: CLG, INK, PAPER, WINDOW 
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CONT 
CONT 
CONT 


KOMMANDO: Setzt ein Programm fort (engl. CONTinue), das entweder durch 
zweimaliges Driicken der [ESC]}-Taste oder nach einem STOP-Befehl 
unterbrochen war. Der Befehl ist nur wirksam, wenn das Programm vorher nicht 
geandert wird, und wenn es nicht geschiitzt ist. 


Kommandos dirfen zwischen Abbruch und Fortsetzung eingegeben werden. 


Verwandte Befehle: STOP 


COPYCHR$ 
COPYCHRS (#-Stream-Ausdruck> ) 


10 CLS 

26 PRINT "obere Ecke" 
3@ LOCATE 1,1 

40 aS=COPYCHRS(#@) 

56 LOCATE 1,26 

68 PRINT a$ 

run 


FUNKTION: Kopiert ein Zeichen im angegebenen Bildschirmbereich (Stream), 
der unbedingt angegeben werden mu3. Im Beispielprogramm wird der Buchstabe 
von Position 1,1 (oben links auf dem Bildschirm) in Position 1,20 wiederholt. 


Wird das Zeichen nicht erkannt, wird ein Leerstring wiedergegeben. 


Verwandte Befehle: LOCATE 


‘ 
Cos 
COS (.<numerischer Ausdruck> ) 


DEG 
PRINT C0S(45) 
0.707186781 


FUNKTION: Berechnet den COSinus des «numerischen Ausdrucks>. 


Beachten Sie, da} das Ergebnis der Berechnung mit den Befehlen DEG und RAD 
im Winkel- bzw. Bogenmafi ausgedriickt werden kann. 


Verwandte Befehle: ATN, DEG, RAD, SIN 
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CREAL 
CREAL (-numerischer Ausdruck> ) 


16 a=PI 

20 PRINT CINT(Ca) 
30 PRINT CREAL(Ca) 
run 

3 

3.14159265 


Gibt den Ausdruck als reelle Zahl, d.h. als Dezimalzahl zuriick (engl. Convert to 
REAL). 


Verwandte Befehle: CINT 


CURSOR 
CURSOR [.Systemschalter>][ ,.Benutzerschalter>] 


1@ CURSOR 1 

20 PRINT "Frage?"; 

36 aS=INKEYS:IF a$="" THEN 38 
40 PRINT a$ 

5@ CURSOR @ 

run 


KOMMANDO: Stellt den System- bzw. den Benutzerschalter fiir den Cursor auf 
Ein oder Aus. Die ‘Systemschalter>- und <Benutzerschalter--Parameter mtssen 
entweder @ (Aus) oder 1 (Ein) sein. Im obigen INKEY$-Befehl, wo der Cursor 
normalerweise nicht sichtbar ist, wurde er eingeschaltet, indem der 
‘Systemschalter> auf 1 gestellt wurde (Zeile 19). 


Der Cursor ist sichtbar, wenn sowohl der -Systemschalter> als auch der 
‘Benutzerschalter> auf 1 stehen. Beim Befehl INPUT schaltet sich der Cursor 
automatisch an, bei INKEY$ ab. 


Es wird empfohlen, den Cursor abzuschalten, wenn ein Text tiber den Bildschirm 
ausgegeben wird. 


Einer der beiden Parameter, jedoch nicht beide zugleich, kénnen ausgelassen 
werden. Wird ein Parameter nicht angegeben, so dndert sich die Stellung des 
betreffenden Schalters nicht. 


Verwandte Befehle: LOCATE 
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DATA 
DATA -Liste von::Konstante> 


10 FOR x=1 TO 4 

2@ READ Vorname$,Nachname$ 

3@ PRINT Vorname$;" ";Nachname$ 
40 NEXT 

5@ DATA Hilde,Meyer,Karl,Schmidt 
60 DATA Rita,Faber,Rudi,Seiler 


KOMMANDO: Stellt dem Programm Datenwerte zur Verfiigung. Mit dem 
READ-Befeh] konnen Daten in eine Variable eingelesen werden. Danach riickt 
der Zeiger zum nachsten Punkt auf der Datenliste. Mit dem RES TORE-Befehl 
kann der Zeiger an eine bestimmte Stelle der Datenliste gebracht werden. 


Weitere Informationen tiber Daten finden Sie im 2.Teil des 9. Kapitels. 


Verwandte Befehle: READ, RESTORE 


DEC$ 
DECS (.numerischer Ausdruck: ,:Formatschablone: ) 


PRINT DECS(10}7,"f£fLHHHHHHHHH, HH") 
£10,000 ,000.00 


FUNKTION: Gibt den «numerischen Ausdruck> als dezimalen (engl. decimal) 


String wieder. Dabei wird mit der angegebenen -Formatschablone das Format 
des Strings bestimmt. 


Die Formatschablone darf NUR mit folgenden Zeichen angegeben werden: 
oe a a ees 


Wie diese Formatzeichen angewendet werden, ist unter dem Befehl PRINT 
USING ausgefihrt. 


Verwandte Befehle:'BINS, HEXS, PRINT USING, STRS 
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DEF FN 


DEF FN:-Name [ (.Formalparameter: ) ]=<allgemeiner Ausdruck> 


16 t=TIME/3@6 

26 DEF FNUhr=INT(CTIME/3@6-t) 

3@ EVERY 100 GOSUB 5@ 

48 GOTO 48 

5@ PRINT "Programm wurde vor"; 

6@ PRINT FNUhr;"Sekunden gestartet" 
78 RETURN 

run 


KOMMANDO: DE Finiert eine FuNktion. Mit BASIC kann man innerhalb eines 
Programms sogenannte Funktionen definieren, die einen Wert zuriickgeben. Die 
mit DEF FN-Befehlen erzeugten Funktionen gelten innerhalb des Programms 
und arbeiten auf dieselbe Art und Weise wie die in BASIC eingebauten 
Funktionen (z.B. COS). 

(Beachten Sie, da8 im obigen Beispiel der Wert der Funktion FNUhr laufend 
aktualisiert wird, selbst wenn das Programm durch einmaliges Drticken der 
(ESC]-Taste unterbrochen wird, oder wenn es nach zweimaligem Drucken der 
[ESC]-Taste mit dem Befehl CONT wiederaufgenommen wird.) 


Verwandte Befehle: keine 


DEFINT 
DEFINT Liste von:.Buchstaben> 


16 DEFINT n 
20 Zahl=123.456 
3@ PRINT Zahl 
run 

123 


KOMMANDO: Legt fest, daB alle Variablen, die mit den angegebenen 
Buchstaben beginnen, ganzzahlig (engl. INTeger) sind. Wenn kein 
Typenkennzeichen (!, %, oder $) angegeben ist, wird der Standard-(engl. 
DEFault) Variablentyp angenommen. Es kénnen einzelne Buchstaben aufgezahlt 
werden, z.B.: 


DEFINT a,b,c 

..oder es kann ein Buchstabenbereich angegeben werden, z.B.: 
DEFINT a~-z 

Verwandte Befehle: DEFREAL, DEFSTR 
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DEFREAL 
DEFREAL -Liste von::Buchstaben> 

DEFREAL x,a-f 
KOMMANDO: Legt fest, daB alle Variablen, die mit den angegebenen 
Buchstaben beginnen, reelle (engl. real) Zahlen sind. Wenn kein 
Typenkennzeichen (!, %, oder $) angegeben ist, wird der Standard-Variablentyp 
angenommen. Es k6énnen einzelne Buchstaben aufgezahlt werden, z.B.: 

DEFREAL a,b,c 
...oder es kann ein Buchstabenbereich angegeben werden, z.B.: 


DEFREAL a-z 


Verwandte Befehle: DEFINT, DEFSTR 


DEFSTR 
DEFSTR -Liste von:.:Buchstaben- 

108 DEFSTR n 

20 name="Schneider" 

3@ PRINT name 

run 

Schneider 
KOMMANDO: Legt fest, da alle Variablen, die mit den angegebenen 
Buchstaben beginnen, ST Rings sind. Wenn kein Typenkennzeichen (!, %, oder $) 
angegeben ist, wird der Standard-Variablentyp angenommen. Es kénnen einzelne 
Buchstaben aufgezahlt werden, z.B.: 

DEFSTR a,b,c 
...oder es kann ein Buchstabenbereich angegeben werden, z.B.: 


DEFSTR a-z 


Verwandte Befehle: DEFINT, DEFREAL 
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KOMMANDO: Schaltet auf Winkelgradmaf (engl. DEGree) um. Die Werte fiir die 
Funktionen SIN, COS, TAN und ATN werden standardmaBig als Bogenmai 
ausgegeben. Mit DEG wird BASIC auf die Ausgabe von Winkelgradmaf 
umgestellt, bis der Befehl durch RAD, NEW, CLEAR, LOAD oder RUN wieder 
aufgehoben wird. 


Verwandte Befehle: ATN, COS, RAD, SIN, TAN 


DELETE 
DELETE <Zeilenbereich> 
DELETE 180-206 


KOMMANDO: Léscht (engl. delete) alle Programmzeilen innerhalb des 
<Zeilenbereichs>. 


Die erste oder letzte Nummer des <Zeilenbereichs) kann weggelassen werden, 
wenn das gesamte Programm bis zu einer bestimmten Zeile... 


DELETE -200 

...bzw. ab einer bestimmten Zeile... 
DELETE 56- 

..geléscht werden soll. Mit... 
DELETE 

..wird das gesamte Programm gelischt. 


Verwandte Befehle: CHAIN MERGE, RENUM 
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DERR 
DERR 
LOAD "xyz.abc" 


XYZ .ABC not found 
Ready 
PRINT DERR 

146 


FUNKTION: Gibt den letzten Fehlercode an, der vom Diskettenspeichersystem 
ausgegeben wurde. Mit DERR kann festgestellt werden, welcher Fehler im 
Diskettensystem (engl. Disc ERRor) aufgetreten ist. Im Kapitel 7 finden Sie eine 
Liste der Fehlermeldungen. 


Verwandte Befehle: ERL, ERR, ERROR, ON ERROR GOTO, RESUME 


DI 
DI 


10 CLS:TAG:EVERY 18 GOSUB 94 

20 X1=RND*328:X2=RND*320 

30 Y=200+RND*200:CS=CHRSCRND*255) 
40 FOR X=320-X1 TO 328+X2 STEP 4 


58 DI 
60 MOVE 320,0,1:MOVE X-2,Y:MOVE X,Y 
7@ PRINT " ";C$;2FRAME 


8@ EI:NEXT:GOTO 26 
90 MOVE 320,6:DRAW X+8,Y-16,0:RETURN 


KOMMANDO: Verhindert alle Unterbrechungen (engl. Disables Interrupts) 
auBer durch [ESC], bis sie durch das E 1-Kommando wieder erméglicht werden. 
Beachten Sie, da ein Unterbrechungs-Unterprogramm automatisch 
Unterbrechungen von gleicher oder geringerer Prioritat verhindert. 


Das Kommando wird benutzt, um ein Programm ohne Unterbrechung Befehl fiir 
Befehl ablaufen zu lassen, falls z.B. zwei Programmteile ein und dasselbe Mittel 
benutzen wollen. Im obigen Beispiel verwenden das Haupt- und das 
Unterprogramm jeweils den Graphik-Bildschirm. 


Weitere Informationen zum Thema Unterbrechungen finden Sie im 2.Teil des 
9.Kapitels. 


Verwandte Befehle: AFTER, E1, EVERY, REMAIN 
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DIM 
DIM «Liste von:<indizierten Variablen> 


106 CLS 

20 DIM Freund$(5),Tel$(5) 
308 FOR n=1 TO 5 

46 PRINT "Freund Nummer";n 
50 INPUT "Name"; Freund$(n) 
6@ INPUT "Telefon";Tel$(n) 
7@ PRINT 

80 NEXT 

90 FOR n=1 TO 5 

180 PRINT n;Freund$(n),Tel$(n) 
11@ NEXT 

run 


KOMMANDO: Legt die ‘DIMension’ eines Arrays fest. DIM stellt einen 
Speicherbereich fiir Arrays (Tabellen) bereit und legt den héchsten Indexwert 
fest. In BASIC mu8 die Indexobergrenze angegeben werden, sonst wird der 
Standardwert 10 angenommen. 


Ein Array wird durch die <indizierte Variable» gekennzeichnet, die es erméglicht, 
da ein und dieselbe Variable fiir eine Gruppe von Elementen verwendet werden 
kann. Die einzelnen Elemente werden zur Unterscheidung mit einer Indexzahl 
versehen. Kin Array kann mit einer Schleife bearbeitet werden, wobei in jedem 
Durchgang das Element mit der nachsten Indexzah] behandelt wird. 


Der niedrigste Indexwert ist 0, d.h. das erste Element in einem Array hat den 
Index 0. 


Arrays kénnen mehrdimensional sein, wobei jedes Element eine feste Stellung 
innerhalb der Matrix des Arrays einnimmt. Ist die Dimension eines Arrays z.B. 
mit: 

DIM Position$(20,20,20) 
..angegeben, kénnte ein Element des Arrays z.B. iiber: 

Position$(4,5,6) 


aufgerufen werden. 


Verwandte Befehle: ERASE 
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DRAW 
DRAW -x-Koordinate: , :y-Koordinate)[ ,[:Farbstift][ , Farbstiftmodus:]] 


10 MODE @:BORDER @:PAPER @:INK @,@ 
20 x=RND*640: y=RND*400:2=RND*15 

36 DRAW x,y,z 

40 GOTO 20 

run 


KOMMANDO: Zeichnet (engl. draw) eine Linie auf dem Graphik-Bildschirm von 
der augenblicklichen Cursorposition zum  angegebenen  absoluten 
Koordinatenpunkt.Es darf zwischen Farbstift 0 und 15 gewahlt werden. 


Der wahlweise anzugebende -Farbstiftmodus> bestimmt, wie die Farbe des zu 
benutzenden Farbstifts mit den anderen Farben auf dem Bildschirm interagiert. 
Die vier Farbmodi sind: 


0: Normal 

1: XOR (exklusives ODER) 
2: AND 

3: OR 


Verwandte Befehle: DRAWR, GRAPHICS PEN, MASK 


DRAWR 
DRAWR -x-Versatz ,:y-Versatz[,-Farbstift ][ ,.Farbmodus>] 


10 CLS:PRINT "komm die Treppe rauf" 
20 MOVE @,350:FOR n=1 TO 8 

38 DRAWR 50,0 

46 DRAWR @,-5@ 

5@ NEXT:MOVE 348,0:FILL 3 

68 GOTO 60 


KOMMANDO: Zeichnet eine Linie auf dem Graphik-Bildschirm von der 
augenblicklichen Cursorposition zur angegebenen Relativen (x,y)-Position, also 
um x und y Zeichenpositionen versetzt. Es darf zwischen Farbstift 0 und 15 
gewahlt werden. 
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Der wahlweise anzugebende -Farbmodus> bestimmt, wie die Farbe des zu 
benutzenden Farbstifts mit den anderen Farben auf dem Bildschirm interagiert. 
Die vier Farbmodi sind: 

0: Normal 

1: XOR (exklusives ODER) 

2: AND 

3: OR 


Verwandte Befehle: DRAW, GRAPHICS PEN, MASK 


EDIT 
EDIT -Zeilennummer> 
EDIT 20 
KOMMANDO: Ruft eine Zeile mit Cursor zur Bearbeitung auf den Bildschirm. 


Verwandte Befehle: AUTO, LIST 
EI 
EI 


EI 


KOMMANDO: Macht das Kommando DI riickgangig, d.h. ermoglicht wieder 
Unterbrechungen (engl. Enables Interrupts). 


Sind die Unterbrechungsfunktionen in einem Unterbrechungs-Unterprogramm 
ausgeschaltet worden, so treten sie automatisch wieder in Kraft, wenn BASIC am 
Ende des Unterprogramms auf das RETURN- Kommando trifft. 


Weitere Informationen tiber Unterbrechungen finden Sie im 2.Teil des 9.Kapitels. 


Verwandte Befehle: AFTER, DI, EVERY, REMAIN 


ELSE 


(Siehe IF) 


Liste aller BASIC-Befehle Kapitel 3 Seite 21 


END 
END 
END 


KOMMANDO: Beendet die Durchfiithrung eines Programms und schaltet zum 
Direkt-Modus um. In einem Programm kénnen beliebig viele END-Befehle 
vorkommen. Mit der letzten Befehlszeile ENDet ein Programm automatisch. 


Verwandte Befehle: STOP 


ENT 


ENT Hallkurvennummer:| , Htllkurvenabschnitt> j[, Hullkurvenabschnitt>] 
|, Hillkurvenabschnitt>][ , Hillkurvenabschnitt>] 
[, Hullkurvenabschnitt> | 


10 ENT 1,10,-580,10,18,50,18 
20 SOUND 1,500,200,10,,1 
run 


KOMMANDO: Definiert die Tonhiillkurve (engl. Tone ENvelope) fir den 
SOUND-Befehl. Ihre <Hillkurvennummer (Bereich 1 bis 15) wird im 
SOUND-Befehl angegeben. Ist sie negativ (im Bereich -1 bis -15), wiederholt sich 
die Hullkurve bis zum Ende des SOUND-Befehls. 


Fir jeden ‘Hiillkurvenabschnitt> kénnen 2 oder 3 Parameter angegeben werden. 


Werden drei Parameter verwendet, so heiBen diese: 


Schrittanzahl , ‘Schrittweite, <Schrittzeit> 


PARAMETER 1: <Schrittanzahl> 


Dieser Parameter bestimmt, wieviele verschiedene Tonhéhen der Ton in einem 
Hillkurvenabschnitt durchlaufen soll. Wenn Sie z.B. in einem 10 Sekunden 
dauernden Ton 10 Tonhéhenschritte von jeweils einer Sekunde Dauer haben 
wollen, muB8 fiir den Parameter <Schrittanzahl> der Wert 10 angegeben werden. 


Fir die <Schrittanzahl> steht der Wertebereich 0 bis 239 zur Verfiigung. 
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PARAMETER 2: ‘Schrittweite> 


Dieser Parameter mu} im Bereich —128 bis +127 liegen. Mit negativen Schritten 
nimmt die Tonhohe zu, mit positiven Schritten nimmt sie ab. Die kurzeste 
Tonperiode ist 0. Im Kapitel 7 finden Sie eine Aufstellung der gesamten 
Tonperioden. 


PARAMETER 3: Schrittzeit> 


Dieser Parameter gibt die Zeit zwischen den einzelnen Schritten in 
Hundertstelsekunden (0,01 Sekunden) an. Fir diesen Parameter konnen Sie die 
Zahlen 0 bis 255 (wobei 0 als 256 behandelt wird) einsetzen. Das langste 
Zeitintervall zwischen zwei Schritten betragt also 2,56 Sekunden. 


Werden zwei Parameter angegeben, so heifen diese: 


‘Tonperiode> , <Schrittzeit» 


PARAMETER 1: -Tonperiode- 


Dieser Parameter gibt den neuen absoluten Wert fir die Tonperiode an (Siehe 
Parameter 2 des SOUND-Befehls). 


PARAMETER 2: -‘Schrittzeit> 


Dieser Parameter gibt die Zeit zwischen den einzelnen Schritten in 
Hundertstelsekunden (0,01 Sekunden) an. Fur diesen Parameter kénnen Sie die 
Zahlen 0 bis 255 (wobei 0 als 256 behandelt wird) einsetzen. Das langste 
Zeitintervall zwischen zwei Schritten betragt also bis zu 2,56 Sekunden. 


ALLGEMEINES 


Beachten Sie, daB die Gesamtlange aller ‘Schrittzeiten’ nicht gréBer als der 
‘Dauer>-Parameter im SOUND-Befehl sein sollte, sonst hért der Ton auf, bevor er 
alle Tonhohenschritte durchlaufen hat. (In solch einem Fall wird der restliche 
Inhalt der Tonhillkurve geléscht.) 


Wenn umgekehrt der ‘Dauer-Parameter im SOUND-Befehl gréfer ist als die 
Gesamtlange der <Schrittzeiten., wird der Ton, nachdem er alle Schritte 
durchlaufen hat, auf der letzten Note verharren. 


Im ENT-Befehl diirfen bis zu fiinf verschiedene :Hiillkurvenabschnitte- verwendet 
werden, die jeweils aus den oben beschriebenen zwei oder drei Parametern 
bestehen kénnen. 
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Der erste Schritt einer Tonhiillkurve wird unverziiglich ausgefiihrt. 
Wird eine neue Tonhillkurve bestimmt, wird ihr vorheriger Wert geléscht. 


Wird ein ‘Hullkurvenabschnitt> ohne ‘Hillkurvennummer: angegeben, so werden 
die vorherigen Werte geléscht. 


Weitere Informationen tiber Tonerzeugung finden Sie im 2.Teil des 9. Kapitels. 


Verwandte Befehle: ENV, SOUND 


ENV 


ENV. Hillkurvennummer) ,.Hillkurvenabschnitt>][ , Hillkurvenabschnitt>] 
[,<Hullkurvenabschnitt>][ , Htllkurvenabschnitt> ] 
[,Hullkurvenabschnitt>] 


10 ENV 1,15,-1,18,15,1,18 
28 SOUND 1,200,308,15,1 
run 


KOMMANDO: Definiert die Lautstarkenhillkurve (engl. Volume ENvelope) fir 
den SOUND-Befehl. Ihre Hillkurvennummer: (im Bereich 1 bis 15) wird im 
SOUND-Befehl angegeben. 


Jeder Hullkurvenabschnitt kann aus zwei oder drei Parametern bestehen. 
Werden drei Parameter angegeben, so hei®en diese: 
Schrittanzahl , Schrittweite, ‘Schrittzeit> 


PARAMETER 1: ‘Schrittanzahl 


Dieser Parameter bestimmt, wie viele verschiedene Lautstarkeveranderungen der 
Ton in einem Hillkurvenabschnitt durchlaufen soll. Wenn Sie z.B. in einem 10 
Sekunden dauernden Tonabschnitt 10 Lautstarkeveranderungen von jeweils einer 
Sekunde haben wollen, miissen Sie fiir den Parameter <Schrittanzah] den Wert 
10 angeben. 


Fir die ‘Schrittanzahl]> steht der Wertebereich 0 bis 127 zur Verfiigung. 


PARAMETER 2: Schrittweite> 


Die Differenz zwischen den jeweiligen Lautstarkeschritten kann zwischen 0 und 
15 liegen. Die 16 verschiedenen Lautstarkegrade sind dieselben, die Sie im 
SOUND-Befehl héren. Der <Schrittweite’ Parameter kann hingegen zwischen 
-128 und +127 liegen, wobei die Lautstarke nach jeweils 15 Schritten zu 0 
zurtickkehrt. 
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PARAMETER 3: ‘Schrittzeit> 


Dieser Parameter bestimmt die Zeit zwischen den einzelnen Lautstarkeschritten 
in Hundertstelsekunden (0,01 Sekunden). Fiir diesen Parameter kénne Sie die 
Zahlen 0 bis 255 (wobei 0 als 256 behandelt wird) einsetzen. Die langste Pause 
zwischen zwei Schritten betragt also 2,56 Sekunden. 


Werden zwei Parameter angegeben, so heifen diese: 


Registerwert>, ‘Hillkurvenperiode> 


PARAMETER 1: -Registerwert> 


Dieser Parameter gibt den Wert an, der an das Lautstarkeregister des Ton-Chips 
tbermittelt wird. 


PARAMETER 2: .Hillkurvenperiode> 


Dieser Parameter gibt den Wert an, der an das Hillkurvenregister des Ton-Chips 
ubermittelt wird. 


Wer die Hardware-Register direkt setzt, sollte sich in der Hardware auskennen. 
Sind nicht geniigend Kenntnisse iber Hardware vorhanden, so wird empfohlen, 
eine Software-Hillkurve mit einem passenden Schrittzeit-Parameter zu 
benutzen. 


ALLGEMEINES 


Beachten Sie, da& die Gesamtlange aller <Schrittzeiten’ nicht gré8er als der 
‘Dauer Parameter im SOUND-Befehl sein sollte, sonst hért der Ton auf, ehe alle 
Lautstarkeveranderungen durchlaufen sind. (In solch einem Fall wird der 
restliche Inhalt der Lautstarken-Hiillkurve geléscht.) 


Wenn umgekehrt der ‘Dauer-Parameter im SOUND-Befehl gréSer ist als die 
Gesamtlange der Schrittzeiten, wird der Ton, nachdem er alle Lautstarkeschritte 
durchlaufen hat, auf dem letzten Lautstarkegrad verharren. 


Im ENV-Befehl diirfen bis zu fiinf verschiedene Hillkurvenabschnitte verwendet 
werden, die jeweils aus den oben beschriebenen zwei oder drei Parametern 
bestehen kénnen. 


Der erste Schritt einer Lautstarken-Hillkurve wird unverziiglich ausgefithrt. 


Wird eine neue Lautstarken-Hillkurve bestimmt, wird ihr vorheriger Wert 
geléscht. 
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Wird eine  Lautstarken-Hillkurvennummer ohne  Hillkurvenabschnitt 
angegeben, so werden die vorherigen Werte geloscht. 


Weitere Informationen tiber Tonerzeugung finden Sie im 2.Teil des 9. Kapitels. 
Verwandte Befehle: ENV, SOUND 


EOF 
EOF 


10 OPENIN "ext.bas" 
20 WHILE NOT EOF 
3@ LINE INPUT #9,a$ 
4@ PRINT a$ 

5@ WEND 

6@ CLOSEIN 


FUNKTION: Priift, ob eine Eingabe von Diskette das Dateiende (engl. End Of 
File) erreicht hat. Gibt -1 (richtig) zuriick, wenn keine Datei geéffnet ist, oder 
Datei zu Ende ist, ansonsten erscheint 0 (falsch). 


Verwandte Befehle: OPENIN, CLOSEIN 


ERASE 
ERASE «Liste von::Variablenname> 


DIM a( 188) ,b$ (188) 
ERASE a,b$ 


KOMMANDO: Léscht (engl. erase) den Inhalt eines Arrays, das nicht langer 
bendétigt wird. Der Speicherplatz kann nun anderweitig verwendet werden. 


Verwandte Befehle: DIM 
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ERL 


ERL 


18 ON ERROR GOTO 30 

20 GOTO 1008 

30 PRINT "Fehler in Zeile";ERL 
40 END 

run 


FUNKTION: Gibt die Zeilennummer (engl. Line number) an, in der der letzte 
Fehler (engl. ERror) aufgetreten ist. Im obigen Beispiel gibt ERL an, daf der 
Fehler in Zeile 20 liegt. 


Verwandte Befehle: DERR, ERR, ERROR, ON ERROR GOTO, RESUME 


ERR 
ERR 


GOTO 500 

Line does not exist 
Ready 

PRINT ERR 

8 


FUNKTION: Gibt die Nummer an, unter der die zuletzt aufgetretene 
Fehlermeldung in der Fehlerliste (siehe Kap.7) zu finden ist. Die Fehlermeldung 
‘Line does not exist’ aus unserem Beispiel ist unter Punkt 8 in der 
Fehlerliste aufgefihrt. 


Verwandte Befehle: DERR, ERL, ERROR, ON ERROR GOTO, RESUME 


ERROR 
ERROR <ganzzahliger Ausdruck> 


1@ IF INKEY$=""" THEN 18 ELSE ERROR 17 
run 


KOMMANDO: Ruft den im «ganzzahligen Ausdruck> angegebenen Fehler auf. Im 
7. Kapitel finden Sie eine Liste der 32 Fehlermeldungen. BASIC wird den Fehler 
so behandeln als hatte es ihn selbst entdeckt, und wird zu_ einer 
Fehlerbehandlungsroutine springen. AuBerdem werden durch den Befehl ERROR 
die zugehérigen Werte fiir ERR und ERL angegeben. 
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Wenn sie ERROR mit einem -ganzzahligen Ausdruck» zwischen 33 und 255 
versehen, kénnen Sie ihre eigenen Fehlermeldungen kreieren, wie das folgende 
Beispiel erlautert: 


18 ON ERROR GOTO 108 

20 LINE INPUT "Gib ein Zeichen ein ";a$ 
3@ IF LENCa$)<>1 THEN ERROR 100 

40 GOTO 26 

106 IF ERR=10@ THEN 118 ELSE 120 

11@ PRINT CHRS(7) 

12@ PRINT "Ich sagte, EIN Zeichen!" 

138 RESUME 26 

run 


Verwandte Befehle: ERL, ERR, ON ERROR GOTO, RESUME 


EVERY — 
EVERY -Zeitintervall-[ ,:Zeitgeber.] GOSUB :Zeilennummer> 


18 EVERY 58,1 GOSUB 38 
28 GOTO 26 

38 SOUND 1,286 

4@ RETURN 

run 


KOMMANDO: Ruft in regelmafigen Zeitabstanden ein BASIC-Unterprogramm 
auf. Das -Zeitintervall. wird in Einheiten zu Finfzigstelsekunden (0,02 
Sekunden) angegeben. 


Der <Zeitgeber. bestimmt, welcher der vier Zeitgeber (Bereich 0 bis 3) verwendet 
wird. Zeitgeber 3 hat die héchste, Zeitgeber 0 (Standardzeitgeber) die niedrigste 
Prioritat. 


Mit jedem Zeitgeber kann ein Unterprogramm verbunden werden. 


Weitere Informationen tber Unterbrechungen finden Sie im 2.Teil des 9. 
Kapitels. 


Verwandte Befehle: AFTER, REMAIN 
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EXP 
EXP (.numerischer Ausdruck> ) 


PRINT EXP(6.876) 
968.743625 


FUNKTION: Gibt den Wert von ‘e’,potenziert mit dem «numerischen Ausdruck>, 
zurick. ‘e’ ist der natiirliche Logarithmus von 1, also angenahert 2,7182818. 


Verwandte Befehle: LOG 


FILL 
FILL -Farbstift> 


18 MODE @ 

280 FOR n=1 TO 508 

38 PRINT "0"; 

40 NEXT 

5@ Farbstift=2+RND*13 
6@ FILL Farbstift 

78 GOTO 56 


KOMMANDO: Fillt (engl. fill) einen beliebigen Bereich auf dem 
Graphik-Bildschirm mit dem angegebenen Farbstift (Bereich 0 bis 15) aus. Die 
begrenzenden Linien dieses Bereichs werden entweder mit dem im GRAPHICS 
PEN-Befehl festgelegten Farbstift oder mit dem Farbstift gezogen, der den 
Bereich ausfiillen soll. 


Der Farbstift beginnt seine Arbeit an der Graphik-Cursor-Position. Liegt der 
Cursor am Rand des auszufiillenden Bereichs, passiert gar nichts. 


Verwandte Befehle: GRAPHICS PEN 


FIX 
FIX (mumerischer Ausdruck> ) 


PRINT F1IX(9.99999) 
9 


FUNKTION: Rundet den «numerischen Ausdruck> zu einer ganzen Zahl ab, d.h. 
die Zahlen hinter dem Dezimalpunkt werden abgeschnitten. 


Verwandte Befehle: CINT, INT, ROUND 
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FN 


(Siehe DEF FN) 


FOR 
FOR -einfache Variable =:Start> TO -Ende[S TEP-Schrittweite ] 


1@ FOR n=2 TO 8 STEP 2 
2@ PRINT n; 

38 NEXT n 

run 


KOMMANDO: Wiederholt den Programmteil zwischen den FOR und 
NEXT-Befehlen so oft, bis die Werte zwischen <Start> und -Ende> durchlaufen 
sind. Ist keine ‘Schrittweite. angegeben, so wird der Wert 1 angenommen. 


Fir die ‘Schrittweite- darf auch ein negativer numerischer Ausdruck> angegeben 
werden. In diesem Fall muf der -Start-- Parameter gréfer sein als der 
‘Ende>-Parameter, sonst schreitet das Programm nicht zum jeweils nachsten 
Wert. 


FOR...NEXT-Schleifen kénnen verschachtelt werden, d.h. in eine Schleife kann 
eine andere eingebaut sein, in die eine dritte Schleife eingebaut ist, usw. 


Im NEXT-Kommando braucht der Variablenname nicht angegeben zu werden, da 
BASIC automatisch herausfindet, auf welches FOR sich eine anonymes NEXT 
bezieht. 


Verwandte Befehle: NEXT, STEP, TO 
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1@ MODE @ 

20 PRINT "FRAME off” 

30 TAG 

46 MOVE @,208 

50 FOR x=@ TO 500 STEP 4 
60 IF f=1 THEN FRAME 

70 MOVE x,200 

80 PRINT " ";CHR$(143); 
90 NEXT 

190 IF f=1 THEN RUN 

118 CLS 

120 TAGOFF 

130 PRINT "FRAME on" 
140 f=1 

158 GOTO 30 

run 


KOMMANDO: Synchronisiert den Schreibvorgang auf dem Bildschirm mit dem 
Strahlricklauf (engl. frame flyback). Dadurch wird eine weichere Bewegung von 
Zeichen oder Graphik auf dem Bildschirm bewirkt, ohne Flackern oder Flimmern. 


Verwandte Befehle: TAG, TAGOFF 


FRE 


FRE (.numerischer Ausdruck> ) 
FRE (String>) 


PRINT FRE(@) 
PRINT FREC"") 


FUNKTION: Stellt den Umfang des von BASIC nicht in Anspruch genommenen 


Speicherplatzes fest. Mit FRE('"'") werden auch kleinste FREie Speicherplatze 
aufgespurt. 


Beachten Sie, da8 BASIC nur die ersten 64K des Speichers beansprucht. 


Verwandte Befehle: HIMEM, MEMORY 
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GOSUB 
GOSUB <Zeilennummer> 
GOSUB 210 


KOMMANDO: Springt zu einem BASIC-Unterprogramm (engl. SUB-routine) in 
der angegebenen :Zeilennummer>. Nach dem Kommando RETURN, mit dem jedes 
Unterprogramm endet, fahrt das Programm mit der Anweisung fort, die dem 
Aufruf des Unterprogramms folgt. 


Verwandte Befehle: RETURN 


GOTO 
GOTO :Zeilennummer> 
GOTO 98 
KOMMANDO: Springt zur angegebenen «Zeilennummer>. 


Verwandte Befehle: keine 


GRAPHICS PAPER 
GRAPHICS PAPER Farbstift: 


10 MODE @ 

28 MASK 15 

3@ GRAPHICS PAPER 3 
40 DRAW 640,80 

run 


KOMMANDO: Legt fest, auf welchem Farbhintergrund (.Farbstift--Skala 0 bis 
15) die Zeichnungen auf dem Graphik-Bildschirm erscheinen sollen. Beim 
Zeichnen durchgehender Linien ist die Hintergrundfarbe unsichtbar. Im obigen 
Beispiel wird mittels des MASK-Befehls eine durchbrochene Linie gezeichnet, so 
da die Hintergrundfarbe sichtbar wird. 


Die GRAPHICS PAPER-Farbe bildet den Hintergrund fiir Zeichen, die unter 
Anwendung des TAG-Befehls auf den Graphik-Bildschirm geschrieben werden. 
Sie stellt auBerdem die Standardfarbe dar, wenn der Graphik-Bildschirmbereich 
mit dem Befehl CLG geléscht wird. 


Verwandte Befehle: CLG, GRAPHICS PEN, INK, MASK, TAG, TAGOFF 
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GRAPHICS PEN 
GRAPHICS PEN [-Farbstift> ][ ,.Hintergrundmodus> ] 


18 MODE @ 

2@ GRAPHICS PEN 15 
30 MOVE 200,80 

40 DRAW 200,400 

58 MOVE 639,06 

6@ FILL 15 


KOMMANDO: Bestimmt den -Farbstift> (Bereich 0 bis 15) zum Zeichnen von 
Linien und Punkten. Der «Hintergrundmodus: ist entweder 


0: Nicht transparenter Hintergrund 
oder 
1: Transparenter Hintergrund 


(Beim Transparent-Modus erscheint der Hintergrund der unter Anwendung des 
TAG-Befehls auf den Bildschirm geschriebenen Zeichen sowie die Zwischenraume 
in gestrichelten Linien in der GRAPHICS PAPER-Farbe.) 

Einer der beiden Parameter, jedoch nicht beide, kénnen ausgelassen werden. 
Wird ein Parameter ausgelassen, andert sich die jeweilige Einstellung nicht. 


Verwandte Befehle: GRAPHICS PAPER, INK, MASK, TAG, TAGOFF 


HEX$ 
HEX$ (.vorzeichenloser ganzzahliger Ausdruck>[ , ‘Feldbreite>]) 


PRINT HEX$(255,4) 
OOFF 


FUNKTION: Gibt den Wert des <vorzeichenlosen ganzzahligen Ausdrucks> in 
HEXadezimaler Form wieder. Die -Feldbreite’ gibt an,  wieviele 
Hexadezimalziffern (zwischen 0 und 16) verwendet werden sollen. Ist die Anzahl 
der tatsdchlich bendtigten Ziffern kleiner als vorgeschrieben, so werden der 
Hexadezimalzahl Nullen vorangestellt. Ist sie gré8er als vorgeschrieben, so wird 
die Hexadezimalzahl NICHT gekirzt, sondern in sovielen Ziffern ausgegeben, wie 
benotigt werden. 


Der Wert des <vorzeichenlosen ganzzahligen Ausdrucks>, der in Hexadezimalform 
umgewandelt werden soll, mu zwischen —32768 und +65535 liegen. 


Verwandte Befehle: BINS, DECS, STRS, UNT 
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HIMEM 
HIMEM 


PRINT HIMEM 
42619 


FUNKTION: Gibt die héchste (engl. HI ghest) von BASIC belegte Speicheradresse 
an, (die mit dem MEMORY-Befehl neu festgelegt werden kann). 


Beachten Sie, daB BASIC nur die ersten 64K im Speicher beansprucht. 
Verwandte Befehle: FRE, MEMORY, SYMBOL, SYMBOL AFTER 


IF 
IF dogischer Ausdruck> THEN «Option [E LSE Option>] 


1@ MODE 1 

28 x=CINTCRND*100) 

30 PRINT "Rate meine Zahl (@ bis 100)" 

40 INPUT n 

50 IF n<x THEN PRINT n;"ist zu niedrig" 

6@ IF n>x THEN PRINT n;"ist zu hoch" 

70 IF n=x THEN 8@ ELSE c=c+1:G0TO 40 

8@ PRINT "Gut gemacht, du hast richtig geraten!"; 
96 PRINT ct+1;"Versuche!" 

run 


KOMMANDO: Stellt fest, ob (engl. if) der ogische Ausdruck> zutrifft. Wenn ja, 
dann (engl. then) wird die erste Option ausgefiihrt. Wenn nicht, wird eine Option 
aus dem ELSE-Teil ausgefiithrt. Ist keine ELSE-Option angegeben, fahrt BASIC 
mit der nachsten Programmzeile fort. 


Es kénnen beliebig viele IF-Anweisungen ineinander verschachtelt werden. Da 
der I F-Befehl erst mit der Zeile endet, diirfen Anweisungen, die nichts mit dem 
I F-Kommando zu tun haben, NICHT in derselben Zeile stehen. 


Um anzugeben, daB je nach dem Ergebnis des (logischen Ausdruck> zu einer 
bestimmten Zeile gesprungen werden soll, bestehen folgende Méglichkeiten: 


IF a=1 THEN 108 

IF a=1 GOTO 108 

IF a=1 THEN GOTO 100 
Verwandte Befehle: ELSE, GOTO, THEN 
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INK 
INK -Farbstift> ,.Farbe>[ ,<Farbe>] 


1@ MODE 1:PAPER @:PEN 1 

26 FOR p=8 TO 1 

30 FOR i=@ TO 26 

40 INK p,i 

50 LOCATE 16,12:PRINT "Farbstift";p;",";i 
68 FOR t=1 TO 400:NEXT t,i,p 

76 INK @,1:INK 1,24:CLS 


KOMMANDO: Ordnet einem Farbstift eine oder zwei Farben zu. Als 
‘Farbstift»-Parameter wird ein ganzzahliger Ausdruck zwischen 0 und 15 
angegeben, der auch in den zugehérigen PEN- und PAPER-Befehlen eingesetzt 
wird. Der erste ‘Farbe--Parameter sollte einen ganzzahligen Ausdruck zwischen 0 
und 26 fiir den Farbwert enthalten. Wird wahlweise eine zweite Farbe bestimmt, 
so wechseln sich die beiden Farben mit der im SPEED INK- Befehl angegebenen 
Geschwindigkeit ab. 


Verwandte Befehle: GRAPHICS PAPER, GRAPHICS PEN, PAPER, PEN, 
SPEED INK 


INKEY 
INKEY (-ganzzahliger Ausdruck: ) 


10 IF INKEY(55)<>32 THEN 10 

2@ PRINT “Du hast CSHIFTJ] und V gedrueckt" 
38 CLEAR INPUT 

run 


FUNKTION: Fragt (engl. INterrogate) die Tastatur (engl. KEYboard), welche 
Taste gedrickt wird. Die Tastatur wird jede Funfzigstelsekunde (alle 0,02 
Sekunden) daraufhin untersucht. 


Mit dieser Funktion 148t sich leicht feststellen, ob eine bestimmte Taste gedriickt 
wird oder nicht, denn unabhangig davon, in welcher Stellung sich die [- 
SHIFT]-und [CONTROL]-Tasten befinden, erscheint der Wert -1, wenn keine 
andere Taste gedrtickt wird. 
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Im obigen Beispiel stellt die Funktion fest, wenn [SHIFT] und V (Taste Nr.55) 
gleichzeitig gedriickt werden. Sobald das der Fall ist, wird das Programm 
beendet. Eine Liste der Tasten mit den zugehérigen Nummern finden Sie oben 
rechts neben dem Tastenfeld und im Kapitel 7. 


Am Zahlenwert, den der Computer ausgibt, 148t sich ablesen, ob eine bestimmte 
Taste gedriickt wird, und in welcher Stellung sich die [SHIFT]- und 
[CONTROL]-Tasten dabei befinden: 


[SHIFT] [CONTROL] 


Ausgegebener Wert gedriickt —gedriickt Taste gedrtickt 
-1 ja/nein ja/nein nein 

0 nein nein ja 

32 ja nein ja 

128 nein ja ja 

160 ja ja ja 


Verwandte Befehle: CLEAR INPUT, INKEYS, JOY 


INKEY$ 
INKEY$ 


18 CLS 

20 PRINT "Waehle Ja oder Nein (J/N)" 
38 aS=INKEY$ 

46 IF a$=""" THEN 36 

50 IF a$="j" OR a$="J" THEN 86 

60 IF a$="n" OR aS="N" THEN 98 

78 GOTO 3@ 

86 PRINT "Du hast JA gewaehlt":END 
96 PRINT "Du hast NEIN gewaehlt" 


FUNKTION: Fragt die Tastatur ab, ob eine Taste gedriickt wurde, die fiir einen 
String steht. Wird keine Taste gedriickt, gibt der Computer einen Leerstring aus. 
Im obigen Beispiel wird das Programm in den Zeilen 48 und 7@ gezwungen, in 
einer Schleife zu Zeile 3@ zuriickzukehren. 


Verwandte Befehle: CLEAR INPUT 


Kapitel 3 Seite 36 Liste aller BASIC-Befehle 


INP 


INP (.Schnittstellennummer: ) 


PRINT INPC&FF77) 
255 


FUNKTION: Gibt den Eingabe- (engl.INPut) Wert der mit der 
‘Schnittstellennummer bezeichneten I/O Adresse wieder. 


Verwandte Befehle: OUT, WAIT 


INPUT 
INPUT [#<Stream- , ][; ][:Ausgabetext>:Trennzeichen]:Liste von::Variablen> 


16 MODE 1 

28 INPUT "Gib zwei durch Komma getrennte Zahlen an, die 
miteinander multipliziert werden sollen";a,b 

38 PRINT a;"mal";b;"ist";a*b 

48 GOTO 28 

run 


FUNKTION: Nimmt Daten vom angegebenen <#Stream> auf. (Wenn nichts 
angegeben ist, Daten von Stream #@.) 


Das erste, wahlweise anzugebende Semikolon (;) verhindert den Zeilenvorschub 
nach der Eingabe. 


Das Trennzeichen mu entweder ein Komma oder ein Semikolon sein. Wird ein 
Semikolon angegeben, erscheint hinter dem Ausgabetext ein Fragezeichen. 


Wird ein falscher Datentyp eingegeben, z.B. der Buchstabe 0 statt der Zahl @ 
(Null), wenn eine numerische Variable gefragt ist, so reagiert BASIC mit... 


?Redo from start 


..und wiederholt den Ausgabetext, den Sie ins Programm geschrieben haben. 


Alle Eingaben miissen mit [RETURN] abgeschlossen werden. 


Verwandte Befehle: LINE INPUT 
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INSTR 


INSTR ([<Startposition>,].durchsuchter String: , gesuchter String>) 


10 CLS:FOR n=1 TO 26 

28 Alphabet$S=Alphabet$+CHR$(n+64) 

30 NEXT 

48 INPUT "Gib einen Buchstaben an";a$ 
58 bS=UPPER$(a$) 

60 PRINT b$;" ist Nummer"; 

7@ PRINT INSTR(AlLphabet$,b$); 

806 PRINT "im Alphabet.":PRINT 

90 GOTO 48 


FUNKTION: Forscht im .durchsuchten String» nach dem <gesuchten String> und 
gibt an, an welcher Stelle der gesuchte String zum ersten Mal im durchsuchten 
String auftritt. Bleibt die Suche erfolglos, wird der Wert @ ausgegeben. 


Im .Startpositions-Parameter kann eine ganze Zahl zwischen 1 und 255 
angegeben werden, um zu bestimmen, wo die Suche beginnen soll. 


Verwandte Befehle: keine 


INT 
INT (.numerischer Ausdruck> ) 


PRINT INT(-1.995) 

-2 
FUNKTION: Rundet die angegebene Dezimalzahl zur nachstkleineren ganzen 
Zahl (engl. INTeger) ab. Fur positive Zahlen ergeben sich dieselben Werte wie 
bei der F1X-Funktion, fiir negative Zahlen liegen die ausgegebenen INT-Werte 
hingegen um 1 unter denen der F I X-Werte. 


Verwandte Befehle: CINT, FIX, ROUND 
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JOY 
JOY (:ganzzahliger Ausdruck> ) 


10 PRINT "Um das Programm zu beenden - "; 
20 PRINT "benutze den Joystick" 

30 IF JOY(®)<>® THEN END 

49 GOTO 10 

run 


FUNKTION: Liest einen Bit-signifikanten Wert, der den Bewegungen des im 
‘ganzzahligen Ausdruck> bezeichneten Joysticks (entweder @ oder 1) entspricht. 


Bit Bedeutung Dezimalwert 
0: aufwarts 1 
1: abwarts 2 
2: links 4 
3: rechts 8 
4: Feuer 2 16 
5: Feuer 1 32 


Wenn also der Haupt-‘Feuer’-Knopf (Feuer 2) auf dem ersten Joystick gedriickt 
wird, wahrend der Joystick-Griff nach links bewegt wird, gibt die Funktion 
JO0Y(CO) den Dezimalwert 20 wieder, der sich aus 16 (Feuer 2) und 4 (links) 
zusammensetzt. 


Weitere Informationen tiber Joysticks finden Sie im Kapitel 7. 


Verwandte Befehle: CLEAR INPUT, INKEY 


KEY 


KEY «Erweiterungszeichennummer: , ‘String: 


KEY 11,"border 13:paper @:pen 1:ink 
8,13:ink 1,@:mode 2:list"+CHR$(13) 


.. Jetzt [ENTER] driicken. 


KOMMANDO: Ordnet den String» der mit der .Erweiterungszeichennummer, 
bezeichneten Taste zu. Es gibt 32 Erweiterungszeichen (0 bis 31), die die 
Tastenwerte 128 bis 159 belegen. Tasten 128 (0 auf der Zahlentastatur) bis 140 
({(CONTROL] [ENTER)]) sind standardmafhig auf die Zahlen 0 bis 9 , sowie auf den 
Punkt, auf [RETURN] und RUN"[RETURN] - (fiir die Bedienung des 
Kassettenrecorders) festgelegt, doch kénnen ihnen bei Bedarf auch andere 
Strings» zugeordnet werden. Die Erweiterungszeichen 13 bis 31 (Tastenwerte 141 
bis 159) sind standardmafig Leerstrings, diirfen jedoch unter Verwendung des 
KEY DEF-Befehls erweitert und Tasten zugeordnet werden. 
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Als <Erweiterungszeichennummer> zur Bezeichnung der Taste kann eine Zahl 
zwischen 0 und 31 oder zwischen 128 und 159 gewahlt werden.(Vergleiche 
Abbildung der Tastatur im Kapitel 7). 


Insgesamt kénnen den Tasten 120 Zeichen zugeordnet werden. Versucht man, 
diese Grenze zu tberschreiten, antwortet der Computer mit der Fehlermeldung 5: 
"Improper Argument’. 


Verwandte Befehle: KEY DEF 


KEY DEF 


KEY DEF-<Tastennummer , Dauerfunktion>| ,.Normalzeichen> 
[, Shift>[ ,:Control>}]] 


KEY 159,"Dies ist die TAB-Taste" 
KEY DEF 68,1,159 


.. Jetzt die [TAB]-Taste driicken. 


KOMMANDO: DE Finiert die Tasten-Werte, die durch Driicken der Taste mit der 
angegebenen .Tastennummer> ausgegeben werden. (Die Tastennummern - 0 bis 
79 - finden Sie auf Ihrem Computer rechts oben neben dem Tastenfeld oder im 
Kapitel 7). Die Normal>-, ‘Shift-- und .Control-Parameter enthalten die Werte, 
die ausgegeben werden sollen, wenn die Taste allein, mit der (Shift)-Taste oder 
mit der (Control)-Taste gedriickt wird. Diese drei Parameter kénnen wahlweise 
angegeben werden. 


Mit dem <Dauerfunktions.-Parameter (1 oder 0) kénnen Sie die Dauerfunktion 
einer Taste an- oder abstellen. Die Geschwindigkeit, mit der ein Zeichen in 
Dauerfunktion wiederholt wird, 1a8t sich mit dem SPEED KEY-Kommando 
varileren. 


Im obigen Beispiel wird Taste 159 (sie entspricht dem Erweiterungszeichen 31) 
erst einem Erweiterungsstring zugeordnet. Der KEY DEF-Befehl bewirkt, da8 
Taste 68 (die [TAB]-Taste) ihre Dauerfunktion austibt und den .normalen> Wert 
159 ausgibt, wenn sie allein gedriickt wird. 


Die urspriingliche Funktion der Taste wird folgendermaSen wiederhergestellt: 
KEY DEF 68,0,9 
9 ist der normale ASCII-Wert fiir [TAB]. 


Verwandte Befehle: KEY, SPEED KEY 
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LEFT$ 
LEFT$ (String ,Lange ) 


10 CLS 

20 aS$="Schneider" 

38 FOR n=1 TO 9 

40 PRINT LEFT$(a$,n) 
5@ NEXT 

run 


FUNKTION: Gibt den <String> in der angegebenen «Lange (Zeichenanzahl von 0 
bis 255) wieder. Dabei wird er von links (engl. left) beginnend in jeder Zeile um 
ein Zeichen verlangert. Ist er kiirzer als die Lange angibt, wird der ganze String 
entsprechend oft wiederholt. 


Verwandte Befehle: MID$, RIGHTS 


LEN 
LEN (.String>) 


18 LINE INPUT "Gib ein Wort ein";a$ 
20 PRINT "Das Wort ist"; 

3@ PRINT LENCa$);"Buchstaben lang." 
run 


FUNKTION: Gibt an, wieviele Zeichen (einschlieflich Leerstellen) der ‘String> 
umfa8t. (engl. LENgth) 


Verwandte Befehle: keine 


LET 
LET «Variable =.Ausdruck> 
LET x=100 


KOMMANDO: Weist einer Variablen einen Wert zu. Veraltete Form aus 
friheren BASIC-Sprachen, Variablen einen Wert zuzuweisen. Das Kommando ist 
im Schneider-BASIC tiberfltissig, wurde aber aus Griinden der Kompatibilitat mit 
Programmen aus alteren BASIC-Handbiichern aufgenommen. Das obige Beispiel 
kann einfach in folgender Form geschrieben werden: 


x=180 


Verwandte Befehle: keine 
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LINE INPUT 
LINE INPUT [#-Stream> , ]I; |[‘:Ausgabetext:Trennzeichen |.Stringvariable> 


16 LINE INPUT "Schreibe eine Zeile Text";a$ 


20 CLS 

30 PRINT "Die Variable a$ entspricht jetzt:-" 
40 PRINT a$ 

run 


KOMMANDO: Liest eine Zeile (engl. line) Text vom angegebenen <#Stream>. 
(Stream #@ wird angenommen, wenn der Parameter nicht angegeben wird.) Das 
erste, wahlweise anzugebende Semikolon (; ) verhindert den Zeilenvorschub nach 
der Eingabe. 


Das Trennzeichen kann entweder ein Komma oder ein Semikolon sein. Ein 
Semikolon lat hinter dem Ausgabetext ein Fragezeichen erscheinen. 


Die Eingabe uber die Tastatur wird durch Driicken der [RETURN]-Taste 
abgeschlossen. 


Die Eingabe von Diskette oder Kassette (Stream #9) wird beendet, wenn der 
Zeilenvorschub erfolgt, oder wenn das Limit von 255 Zeichen fir die 
Stringvariable erreicht ist. 


Verwandte Befehle: INPUT 


LIST 
LIST [:Zeilenbereich: ][, #:Stream:] 
LIST 1860-1000,#1 


KOMMANDO: Listet Programmzeilen im angegebenen Bildschirmbereich 
(Stream) auf. Wird der Parameter nicht angegeben, wird Stream 40 
angenommen. Stream #8 ist der Drucker. Durch einmaliges Driicken der 
[ESC]-Taste kann das LISTen unterbrochen und durch die Leertaste wieder 
fortgesetzt werden. Zweimaliges Driicken von [ESC] bricht die Auflistung ab und 
schaltet auf Direktmodus um. 


Die erste oder letzte Nummer des -Zeilenbereichs» kann weggelassen werden, 
wenn das gesamte Programm bis zu einer bestimmten Zeile: 


LIST -200 
...bzw. ab einer bestimmten Zeile: 


LIST 5@ - 
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..aufgelistet werden soll. Mit: 
LIST 
..wird das gesamte Programm aufgelistet. 


Verwandte Befehle: keine 


LOAD 
LOAD .Dateiname)[ ,:Adresse>] 
LOAD "Programm.xyz",&2AF8 


KOMMANDO: Ladt (engl. load) ein BASIC-Programm in den Speicher und léscht 
dabei ein eventuell im Speicher befindliches Programm. Wird auSerdem eine 
Adresse angegeben, kann eine binare Datei an die entsprechende Stelle des 
Speichers geladen werden, anstatt an die Adresse, von der es gespeichert wurde. 


Ein geschiitztes Programm kann NICHT mit LOAD geladen werden, da es sonst 
sofort aus dem Speicher geléscht wiirde. Fir geschiitzte Programme werden 
stattdessen die Befehle RUN und CHAIN verwendet. 


Verwandte Befehle: CHAIN, CHAIN MERGE, MERGE, RUN, SAVE 


LOCATE 
LOCATE (#Stream , |:x-Koordinate> , -y-Koordinate> 


10 MODE 1 

20 FOR n=1 TO 20 

3@ LOCATE n,n 

48 PRINT CHR$(143);"Position"; 
5@ PRINT n;","7n 

68 NEXT 


KOMMANDO: Setzt (engl. locate) den Text-Cursor im angegebenen 
Bildschirmbereich (Stream) auf die durch die x- und y-Koordinaten definierte 
Stelle. Position 1,1 befindet sich in der linken oberen Ecke des 
Bildschirmbereichs. Stream #9 wird als Standardparameter angenommen, wenn 
nichts anderes angegeben ist. 


Verwandte Befehle: WINDOW 


Liste aller BASIC-Befehle Kapitel 3 Seite 43 


LOG 


LOG (.numerischer Ausdruck> ) 


PRINT LOG(9999) 
9.21824837 


FUNKTION: Berechnet den natirlichen LOGarithmus des <numerischen 
Ausdrucks>, der gréRer als 0 sein muB. 


Verwandte Befehle: EXP, LOG1@ 


LOG1@ 
LOG1@ (<numerischer Ausdruck ) 


PRINT LOG19(9999) 
3.99995657 


FUNKTION: Berechnet den Logarithmus zur Basis 1@ des <numerischen 
Ausdrucks>, der gréBer als 0 sein muf. 


Verwandte Befehle: EXP, LOG 


LOWER$ 
LOWERS (.String>) 
186 aS$="JETZT ERSCHEINT ALLES IN " 
20 PRINT LOWER$S(Ca$+"KLEINBUCHSTABEN") 
run 
FUNKTION: Alle Buchstaben des angegebenen Strings) werden in 
Kleinschreibung wiedergegeben. Ein niitzliches Hilfsmittel, um Eingaben 


auszuwerten, die in gemischter Schreibweise eingegeben wurden. 


Verwandte Befehle: UPPERS 
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MASK 
MASK [:ganzzahliger Ausdruck>][ ,<erster Punkt>] 


10 MODE @:INK 5,21:INK 8,16 
28 MOVE -10@*RND,400*RND 

30 WHILE XPOS<6490 

40 FOR x=1 TO 8 

5@ mask 2f (8-x) 

60 DRAWR 32,8,x,1:MOVER -32,0 
7@ NEXT 

80 MOVER 34,8 

90 WEND:GOTO 26 


KOMMANDO: Legt fest, welche Schablone (engl. mask) beim Zeichnen von 
Linien benutzt werden soll. Der Dualwert des -ganzzahligen Ausdrucks» im 
Bereich 0 bis 255 bestimmt, welche Bildpunkte in jeder der aus acht Bildpunkten 
zusammengesetzten Zeichen gesetzt (1) oder nicht gesetzt (0) werden sollen. 


Im Parameter <erster Punkt> wird entschieden, ob der erste Punkt der Linie 
gezeichnet werden soll (1) oder nicht (0). 


Einer der beiden Parameter kann ausgelassen werden, jedoch nicht beide 
zugleich. Wird ein Parameter ausgelassen, so Andert sich die jeweilige 
Einstellung nicht. 


Verwandte Befehle: DRAW, DRAWR, GRAPHICS PAPER, GRAPHICS PEN 


MAX 

MAX (Liste von: «numerischer Ausdruck> ) 
10 n=66 
20 PRINT MAX (1,n,3,6,4,3) 
run 


66 


FUNKTION: Gibt den gré8ten Wert aus der Liste der numerischen Ausdricke> 
an. 


Verwandte Befehle: MIN 
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MEMORY 
MEMORY Adresse» 
MEMORY &2BAA 
KOMMANDO: Setzt den BASIC zur Verfiigung stehenden Speicherbereich (engl. 


memory) fest, indem es die héchste Byte-Adresse angibt. 
Beachten Sie, da8 BASIC nur die ersten 64K des Speichers beansprucht. 


Verwandte Befehle: FRE, HIMEM, SYMBOL, SYMBOL AFTER 


MERGE 
MERGE -Dateiname> 
MERGE “Neuprog.bas" 


KOMMANDO: Ladt ein Programm von der Diskette in den Speicher und mischt 
(engl. merge) es in das bereits im Speicher befindlichen Programm. 


Beachten Sie, da Zeilen des alten Programms von Zeilen des einzufiigenden 
Programms tiberschrieben werden, wenn sie dieselbe Zeilennummer aufweisen. 


Geschiitzte Dateien, die mit ,P gespeichert wurden, kénnen nicht in das laufende 
Programm integriert werden. 


Verwandte Befehle: CHAIN, CHAIN MERGE, LOAD 


MID$ 
MID$ (.String. ,:Startposition»| ,.Lange des Unterstrings>]) 


10 MODE 1:ZONE 3 

20 aS="ENZYKLOPAEDIE" 

30 PRINT "Wie buchstabiert man ";a$ 
40 PRINT "OK....":PRINT 

56 FOR n=1 TO LEN(a$) 

6@ PRINT MID$(a$,n,1), 

7@ FOR t=1 TO 7@@:NEXT t,n 

80 PRINT:PRINT 

96 INPUT "Gib ein neues Wort an";a$ 
108 GOTO 58 

run 
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FUNKTION: Gibt einen neuen Unterstring wieder, der in der :Startposition> des 
Strings» beginnt und die Anzahl von Zeichen aufweist, die in der «Lange des 
Unterstrings) angegeben wurde. Wird die Anzahl der Buchstaben nicht 
angegeben, wird alles, was auf die -Startposition’ des Strings folgt, 
wiedergegeben. 

Wird fir <Startposition» eine Zahl angegeben, die die Anzahl der Zeichen im 
‘String> tbersteigt, wird ein Leerstring ausgegeben. Der Wertebereich fiir 
‘Startposition» liegt zwischen 0 und 255. Die :Lange des Unterstrings» kann 
ebenfalls zwischen 0 und 255 Zeichen liegen. 


Verwandte Befehle: LEFT$, RIGHTS 


MID$ 
MIDS (.Stringvariable: , .Einfiigestelle[, neue Stringlange>]) =.neuer String> 


18 a$="hallo" 

20 MID$(a$,3,2)="XX" 
3@ PRINT a$ 

run 

haXXo 


KOMMANDO: Figt den -neuen String» in den String ein, der durch 
‘Stringvariable> definiert ist. Der neue String tiberschreibt den bisherigen Text 


ab der durch die -Einfiigestelle. bezeichneten Stelle und ist so lang wie im 
Parameter <neue Stringlange angegeben. 


Wenn Sie den Befehl MID$ als Kommando verwenden, mu8 die <Stringvariable., 
z.B. a$ angegeben werden, und NICHT die String-Konstante, z.B. ‘hallo’. 


Verwandte Befehle: LEFT$, RIGHTS 


MIN 
MIN (.Liste von::numerischer Ausdruck> ) 


PRINT MIN(3,6,2.999,8,9) 
2.999 


FUNKTION: Gibt den kleinsten Wert aus der Liste der -numerischen Ausdricke> 
an. 


Verwandte Befehle: MAX 
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MOD 
«Dividend» MOD -Divisor> 


PRINT 18 MOD 3 
1 

PRINT 18 MOD 5 
"7 


OPERATOR: Gibt den (gerundeten) Rest (Modulo) an, nachdem der «Dividend: 
durch den <Divisor> geteilt wurde. 


Verwandte Befehle: keine 


MODE 


MODE -ganzzahliger Ausdruck> 


10 m=m+1:1F m>2 THEN m=9 

26 MODE m 

30 PRINT "Dies ist Modus";m 

46 PRINT "Druecke eine beliebige Taste" 
5@ IF INKEYS=""" THEN 5@ ELSE 10 

run 


KOMMANDO: Andert den Bildschirm-Modus (0,1 oder 2) und setzt den 
Bildschirm auf Farbstift 0 (falls ein anderer Farbstift fir den Untergrund 
verwendet wurde). Alle Text- und Graphik-Fenster werden auf den gesamten 
Bildschirm zurickgesetzt, Text- und Graphik-Cursor werden an_ ihre 
urspriinglichen Positionen gesetzt. 


Verwandte Befehle: ORIGIN, WINDOW 


MOVE 
MOVE «x-Koordinate> ,:y-Koordinate)[ ,[:Farbstift>]| ,.Farbmodus>]] 


1@ MODE 1:TAG 

20 x=RND*800-100:y=RND*430 
36 MOVE x,y 

40 PRINT "Hier bin ich"; 
5@ GOTO 28 

run 
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KOMMANDO: Bewegt (engl. move) den Graphik-Cursor zum absoluten, durch 
«x-Koordinate> und <y-Koordinate> definierten Punkt. Der <Farbstift»-Parameter 
kann zusatzlich angegeben werden, um den Graphik-Farbstift zu andern (Bereich 
0 bis 15). 


Au8erdem kann ein -Farbmodus, angegeben werden, um zu bestimmen, wie der 
Farbstift, mit dem geschrieben werden soll, mit den anderen Farben auf dem 
Graphik-Schirm interagiert. Die vier Farbmodi sind: 


0:Normal 

1:XOR (exklusives ODER) 
2:AND 

3:0R 


Verwandte Befehle: MOVER, ORIGIN, XPOS, YPOS 


MOVER 
MOVER <x-Versatz> , y-Veratz>[ ,[.Farbstift:][ , Farbmodus>]] 


10 MODE 1:TAG:MOVE 6,16 

20 PRINT "im Leben geht es"; 

38 FOR n=1 TO 14 

46 MOVER -32,16 

5@ PRINT “auf";:NEXT:PRINT " und"; 
60 FOR n=1 TO 10 

76 MOVER -64,-16 

86 PRINT "ab"; :NEXT 


KOMMANDO: Bewegt (engl. move) den Graphik-Cursor zu einem Punkt, der von 
seiner gegenwartigen Position aus bestimmt wird. Dieser Relative 
Koordinatenpunkt wird durch die Parameter «x-Versatz» und y-Versatz 
definiert. Mit dem -Farbstift--Parameter (Bereich 0 bis 15) kann der 
Graphik-Farbstift geandert werden. 


Der (wahlweise anzugebende) Farbmodus bestimmt, wie der <Farbstift>, mit dem 
gezeichnet werden soll, mit den anderen Farben auf dem Bildschirm interagiert. 
Die vier Farbmodi sind: 


0:Normal 

1:XOR (exklusives ODER) 
2:AND 

3:0R 


Verwandte Befehle: MOVE, ORIGIN, XPOS, YPOS 
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NEW 
NEW 
NEW 


KOMMANDO: Léscht das im Speicher befindliche Programm und seine 
Variablen. Die Tastendefinitionen bleiben erhalten, ebenso die Einstellungen der 
Bildschirmanzeige, wie MODE, PEN, PAPER, INK usw. Der Bildschirm wird 
nicht geléscht. 


Verwandte Befehle: keine 


NEXT 
NEXT [:Liste von:<Variablen> ] 


18 FOR a=1 TO 3 

28 FOR b=@ TO 26 

30 MODE 1 

4@ PEN a:BORDER b 

5@ PRINT "Schrift";a;"Rand";b 
6@ FOR c=1 TO 588 

70 NEXT c,b,a 


KOMMANDO: Bildet das Ende einer Schleife, die mit FOR beginnt. Das 
NEXT-Kommando kann ohne oder mit dem Variablennamen angegeben werden, 
der auf das entsprechende F 0R-Kommando verweist. Im obigen Beispiel mu8 die 
Liste der Variablen in umgekehrter Reihenfolge zu den entsprechenden 
FOR-Kommandos aufgefiihrt werden, damit sich die ineinanderliegenden 
Schleifen nicht tiberlappen. 


Verwandte Befehle: FOR, STEP, TO 


NOT 
NOT -Aussage> 


IF NOT "Anna"<"Berta" THEN PRINT "richtig" ELSE PRINT 
"falsch" 

falsch 

IF NOT "Katze">Hund THEN PRINT "richtig" ELSE PRINT 
"falsch" 

richtig 


PRINT NOT ~1 
Yi) 
PRINT NOT @ 
-4 
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OPERATOR: Fihrt Bit fir Bit Operationen mit ganzen Zahlen durch, wobei jedes 
Bit seinen Umkehrwert erhalt. 


Weitere Informationen tiber Logik finden Sie im 2.Teil von Kapitel 9. 


Verwandte Befehle: AND, OR, XOR 


ON BREAK CONT 
ON BREAK CONT 


10 ON BREAK CONT 

20 PRINT "Dieses Programm wird auch dann weiterlaufen, 
wenn du versuchst, es mit CESCJ] zu unterbrechen":PRINT 
30 FOR t=1 TO 190@:NEXT:GOTO 26 

run 


KOMMANDO: Unterbindet die Méglichkeit, das Programm durch Driicken der [- 
ESC]-Taste zu unterbrechen. Dieser Befehl sollte mit Vorsicht eingesetzt werden, 
da das Programm weiterlauft, bis der Computer ganz zuriickgesetzt wird. Deshalb 
sollten Sie ein Programm, das diesen Befeh] enthalt, abspeichern, bevor Sie es 
laufen lassen. 


ON BREAK CONT kann mit dem Befehl ON BREAK STOP wieder auBer Kraft 
gesetzt werden. 


Verwandte Befehle: ON BREAK GOSUB, ON BREAK STOP 


ON BREAK GOSUB 
ON BREAK GOSUB -Zeilennummer> 


18 ON BREAK GOSUB 48 

28 PRINT "Programm lLaeuft" 

30 GOTO 20 

40 CLS:PRINT "Wenn du zweimal CESCJ] drueckst, "; 
5@ PRINT "wird die GOSUB-Routine aufgerufen" 

60 FOR t=1 TO 2000:NEXT 

78 RETURN 


KOMMANDO: Springt in das Unterprogramm in der angegebenen Zeile, wenn 
die [ESC]-Taste zweimal gedriickt wird. 
Verwandte Befehle: ON BREAK CONT, ON BREAK STOP, RETURN 
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ON BREAK STOP 
ON BREAK STOP 


10 ON BREAK GOSUB 48 

20 PRINT "Programm laeuft" 

30 GOTO 26 

48 CLS:PRINT "Wenn du zweimal CESC] "; 

5@ PRINT "drueckst, wird die GOSUB-Routine aufgerufen" 
66 FOR t=1 TO 2000:NEXT 

65 ON BREAK STOP 

7@ RETURN 


KOMMANDO: Setzt die Befehle ON BREAK CONT und ON BREAK GOSUB 
aufer Kraft, d-h., das Programm wird gestoppt, wenn die [ESC]-Taste nochmals 
betatigt wird. Im obigen Beispiel ist das ON BREAK GOSUB-Kommando nur 
einmal wirksam, weil das ON BREAK-Unterprogramm in Zeile 65 unterbrochen 
wird. 


Verwandte Befehle: ON BREAK CONT, ON BREAK GOSUB 


ON ERROR GOTO 
ON ERROR GOTO -Zeilennummer> 


18 ON ERROR GOTO 68 

20 CLS:PRINT "Wenn ein Fehler auftritt, "; 
30 PRINT “Liste das Programm auf" 

40 FOR t=1 TO 4800:NEXT 

5@ GOTO 180 

6@ PRINT "Fehler in Zeile"; 

78 PRINT ERL:PRINT:LIST 


KOMMANDO: Springt beim Auftreten eines Fehlers zur angegebenen Zeile. 


Mit ON ERROR GOTO @ wird die Fehler-Falle abgestellt, und BASIC gibt die 
ublichen Fehlermeldungen aus. 


Siehe auch Kommando RESUME. 


Verwandte Befehle: DERR, ERL, ERR, ERROR, RESUME 
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ON :Ausdruck» GOSUB 


ON ‘Selektor’ GOSUB «Liste von::Zeilennummer> 


1@ PAPER @: PEN 1:INK @,1 

20 CLS:PRINT "“Auswahlmoeglichkeiten":PRINT 
3@ PRINT "1 - Randfarbe aendern":PRINT 

40 PRINT "2 - Schriftfarbe aendern":PRINT 
5@ PRINT "3 - Modus aendern":PRINT 

60 INPUT "Welche Moeglichkeit waehlst du";x 
76 ON x GOSUB 98,118,138 

8H GOTO 20 

98 b=b-1:1F b<@ THEN b=26 

188 BORDER b:RETURN 

118 p=p-1:1F p<2 THEN p=26 

120 INK 1,p:RETURN 

130 m=m-1:1F m<@ THEN m=2 

140 MODE m:RETURN 


KOMMANDO: Springt in das Unterprogramm in der angegebenen 
Zeilennummer,, das mit dem Selektor’ aufgerufen wird. Der Selektor ist eine 
positive ganze Zahl zwischen 0 und 255. Der jeweilige Selektorenwert bestimmt, 
die wievielte Zeilennummer aus der Liste der Zeilennummern aufgerufen wird. 
Im obigen Beispiel springt BASIC zu Zeile 98, wenn <Selektor: 1 gewahlt wird, zu 
Zeile 110, wenn 2 gewahlt wird, und zu Zeile 138, wenn 3 gewahlt wird. 


Ist der Selektorenwert 0, oder héher als die Anzahl der Zeilennummern in der 
‘Liste von::Zeilennummer:, wird kein Unterprogramm angesprochen. 


Verwandte Befehle: RETURN 
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ON :Ausdruck» GOTO 
ON <Selektor. GOTO -Liste von::Zeilennummer> 


9 REM ONXGOTO 

10 CLS:PRINT "Auswahlmoeglichkeiten':PRINT 
26 PRINT '1 - Programm auflisten'":PRINT 

3@ PRINT "2 - aendern und hinzufuegen":PRINT 
4Q@ PRINT "3 - Inhaltsverzeichnis der Diskette":PRINT 
5@ INPUT "Was waehlst du";n 

66 ON n GOTO 88,908,100 

70 GOTO 18 

88 LIST 

98 AUTO 

10@ CAT 

run 


KOMMANDO: Springt zur angegebenen -Zeilennummer>, die mit dem ‘Selektor> 
aufgerufen wird. Der Selektor ist eine positive ganze Zahl zwischen 0 und 255. 
Der jeweilige Selektorenwert bestimmt, die wievielte Zeilennummer aus der 
Liste von: Zeilennummer-n aufgerufen wird. Im obigen Beispiel springt BASIC 
zu Zeile 80, wenn (Selektor) 1 gewahlt wird, zu Zeile 98, wenn 2 gewahlt wird, 
und zu Zeile 189, wenn 3 gewahlt wird. 


Ist der Selektorenwert 0, oder héher als die Anzahl der Zeilennummern in der 
Liste von::Zeilennummer-n, wird keine Zeile angesprochen. 


Verwandte Befehle: keine 


ON SQ GOSUB 
ON SQ (.Kanal>) GOSUB -Zeilennummer> 


10 ENV 1,15,-1,1 

20 ON SQ(1) GOSUB 68 

3@ MODE B:ORIGIN 0,0,200,4480,100,306 
46 FOR x=1 TO 13:FRAME:MOVE 330,200,x 
5@ FILL x:NEXT:GOTO 40 

6@ READ s:IF s=@ THEN RESTORE:GOTO 69 
78 SOUND 1,8,25,15,1 

88 ON S$Q(1) GOSUB 6@:RETURN 

98 DATA 50,60,99,100,35,200,24,500,8 
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KOMMANDO: Springt zum Unterprogramm in der angegebenen Zeile, wenn bei 
der Tonausgabe in der Warteschlange des angegebenen <Kanals> Platz frei ist. 
‘Kanal> ist ein «ganzzahliger Ausdruck> mit folgenden Werten: 


1 fir Kanal A 
2 fur Kanal B 
4 fur Kanal C 


Weitere Informationen tiber Tonerzeugung finden Sie im 2.Teil des 9. Kapitels. 


Verwandte Befehle: RETURN, SOUND, SQ 


OPENIN 
OPENIN .Dateiname> 


18 REM Oeffne eine Eingabedatei von der Diskette 
26 OPENIN "Datei":INPUT #9,a,a$ 

3@ CLOSEIN:PRINT "Die beiden Daten heissen:" 

46 PRINT:PRINT a,a$ 

run 


KOMMANDO: Eréoffnet eine Eingabe-Datei von der Diskette, um sie im 
laufenden Programm zu verwenden. Es muf sich dabei um eine ASCII-Datei 
handeln. 


Das obige Beispielprogramm wird nur laufen, wenn Sie die Datei aus dem 
nachsten Beispiel (unter OPENOUT) auf Diskette gespeichert haben. 


Verwandte Befehle: CLOSEIN, EOF 


OPENOUT 
OPENOUT -Dateiname:> 


18 REM Eroeffne eine Ausgabedatei auf der Diskette 
20 INPUT "Gib eine Zahlenvariable an";a 

30 INPUT "Gib eine Stringvariable an";a$ 

48 OPENOUT "Datei" 

5@ WRITE #9,a,a$ 

68 CLOSEOUT:PRINT "Daten auf Diskette gespeichert” 
run 


KOMMANDO: Eroffnet eine Ausgabe-Datei auf Diskette 


Verwandte Befehle: CLOSEOUT 
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OR 


<Aussage OR <Aussage> 


IF "Anna"<"Berta" OR "“Hund">"Katze" THEN PRINT “richt 
ig" ELSE PRINT "falsch" 

richtig 

IF "Berta"<"Anna" OR "Katze">"Hund" THEN PRINT "richt 
ig" ELSE PRINT "falsch" 

falsch 

IF "Anna"<"Berta" OR "Katze">"Hund" THEN PRINT "richt 
ig" ELSE PRINT "falsch" 

richtig 


PRINT 1 OR 1 
1 

PRINT @ OR @ 
Y) 

PRINT 1 OR @ 
1 


OPERATOR: Fihrt Bit fiir Bit Operationen mit ganzen Zahlen durch. Das 
Ergebnis ist 1, es sei denn, beide Argumente entsprechen 0. 


Weitere Informationen iiber Logik finden Sie im 2.Teil des 9. Kapitels. 


Verwandte Befehle: AND, NOT, XOR 


ORIGIN 


ORIGIN «x>,-y>[,links> ,<rechts> , oben , unten: ] 


18 MODE 1:BORDER 13:TAG 

20 ORIGIN @,0,100,549,300,100 

3@ GRAPHICS PAPER 3:CLG 

40 FOR x=55@ TO -31@ STEP -10 

5@ MOVE x,206 

68 PRINT "Dies ist ein Graphikfenster "; 
7@ FRAME:NEXT:GOTO 48 


KOMMANDO: Setzt den Koordinaten-Ursprung (engl. origin) an den durch die 
<x und «y>-Parameter bestimmten Punkt. 
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Durch Angabe der vier Wahl-Parameter kann ein Graphik-Bildschirmbereich 
bestimmt werden. Liegen die Koordinaten hierfir aufSerhalb des 
Bildschirmbereichs, so wird der Bildschirm als Begrenzung gewahlt. 


Verwandte Befehle: WINDOW 


OUT 


OUT .Interfaceadresse> , :ganzzahliger Ausdruck> 
OUT &F8F4,8&FF 


KOMMANDO: Schickt den Wert des <ganzzahligen Ausdrucks>, der zwischen 0 
und 255 liegen mu8, zur Ausgabe an das mit seiner Adresse angesprochene 
Interface. 


Mit Vorsicht anzuwenden! 


Verwandte Befehle: INP, WAIT 


PAPER 
PAPER [#.Stream> , ]Farbstift- 


9 REM paper 

1@ MODE @:PEN @:INK 6,13 

20 FOR p=1 TO 15 

38 PAPER p:CLS 

46 LOCATE 7,12:PRINT "Papier";p 
5@ FOR t=1 TO 5@@0:NEXT t,p 

run 


KOMMANDO: Bestimmt die Farbe des Hintergrunds, das ‘Papier’, auf dem die 
Schrift erscheint. Fir jedes Zeichen, das auf den Bildschirm geschrieben wird, 
fillt sich der zugehorige Hintergrund mit der dem <Farbstift» (ink) zugeordneten 
Farbe des PAPER-Kommandos, falls nicht der Transparentmodus gewahlt wurde. 


Wird der Stream-Parameter ausgelassen, so wird Stream #0 angenommen. 
Die Anzahl der zur Verfiigung stehenden -Farbstifte: im PAPER-Befehl hangt 
vom Modus ab. 


Verwandte Befehle: GRAPHICS PAPER, INK, PEN 
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PEEK 
PEEK (.Adresse> ) 


18 MODE 1:ZONE 7 

20 WINDOW 1,40,1,2:WINDOW #1,1,40,3,25 
3@ PRINT "Speicheradresse" 

46 LOCATE 20,1:PRINT "Speicherinhalt"” 
5@ FOR n=@ TO 65535 

66 p=PEEK(n) 

70 PRINT #1,n,"C&"ZHEX$ (nd; ")"; 

8H PRINT #1,TAB(28);p,"C&"Z7HEX$(p);")" 
96 NEXT 


FUNKTION: Gibt den Inhalt der angegebenen Z80 Speicheradresse an, die im 
Bereich &0000 bis &FFFF (0 bis 65535) liegen sollte. PEEK gibt an, welcher 
Wert (im Bereich &00 bis & FF oder 0 bis 255 ) an der angegebenen RAM-Adresse 
(nicht an der ROM-Adresse) gespeichert ist. 


Verwandte Befehle: POKE 


PEN 
PEN [#-Stream.,][.Farbstift: |[,.Hintergrundmodus: | 


10 MODE O:PAPER @:INK @,13 

20 FOR p=1 TO 15 

30 PEN p:PRINT SPACE$(47);"Schrift";p 
40 FOR t=1 TO 5@O0:NEXT t,p:GOTO 20 
run 


KOMMANDO: Ordnet den angegebenen -Farbstift» zu (Bereich 0 bis 15), der in 
einem Bildschirmbereich (auf dem gesamten Bildschirm, wenn kein Stream 
angegeben ist) verwendet werden soll. Als Hintergrundmodus kann transparent 
(1) oder nicht transparent (0) gewahlt werden. 


Hiner der beiden letzten Parameter kann ausgelassen werden, jedoch nicht beide 
gleichzeitig. Wird ein Parameter ausgelassen, andert sich seine letzte Einstellung 
nicht. 


Verwandte Befehle: PAPER 
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PI 
PI 


PRINT PI 
3.14159265 


FUNKTION: Gibt den Wert Pi an, d.h. das Verhaltnis zwischen Umfang und 
Durchmesser eines Kreises. 


Verwandte Befehle: DEG, RAD 


PLOT 
PLOT «x-Koordinate , :y-Koordinate>| ,|.Farbstift][ , Farbmodus>]] 


108 MODE 1:BORDER @:PAPER @:PEN 1 

20 INK @,8:INK 1,26:INK 2,13,26:DEG 
38 FOR x=1 TO 36B8:0RIGIN 320,260 

40 DRAW 5O*COS(x) ,SB*SIN(x),1 

50 PLOT 188*COS(x),25*SINCx) :NEXT 

68 ORIGIN @,@:t=TIME+7@@:WHILE TIME<t 
78 PLOT RND*648,RND*400:WEND 

8H PLOT RND*648,RND*4008,2 

98 GOTO 98 


KOMMANDO: Setzt einen Punkt (engl. plot) auf dem Graphik-Bildschirm an die 
absolute, durch die x- und y-Koordinate bestimmte Stelle. Bei Bedarf kann der 
Farbstift>, mit dem der Punkt gezeichnet werden soll, aus dem Bereich 0 bis 15 
gewahlt werden. 


Der Wahl-Parameter -Farbmodus> bestimmt, wie der <Farbstift> mit den tibrigen 
Farben auf dem Bildschirm interagiert. Die vier Farbmodi sind: 


0:Normal 

1:XOR (exklusives ODER) 
2:AND 

3:0R 


Verwandte Befehle: GRAPHICS PEN, PLOTR 
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PLOTR 


PLOTR «x-Versatz> ,<y-Versatz>[ ,[Farbstift> ][ , Farbmodus> ]] 


1@ REM Zeichne Linien mit den Cursortasten 
20 BORDER @:GRAPHICS PEN 1 

3@ MODE 1:PLOT 328,260 

40 IF INKEY(@)=@ THEN PLOTR @,1 

5@ IF INKEY(1)=@ THEN PLOTR 1,8 

60 IF INKEY(2)=@ THEN PLOTR @,-1 

76 IF INKEY(8)=@ THEN PLOTR -1,@ 

8@ IF INKEY(9)=@ THEN 3@:REM copy=loeschen 
98 GOTO 46 


KOMMANDO: Setzt einen Punkt (engl. plot) auf dem Graphik-Bildschirm, wobei 
die x- und y-Koordinaten Relativ zur gegenwartigen Cursorposition liegen. 
Wahlweise kann ein :Farbstift> zwischen 0 und 15 angegeben werden. 


Der ebenfalls wahlweise anzugebende -Farbmodus> bestimmt, wie der:Farbstift>, 
mit dem gezeichnet werden soll, mit den tibrigen Farben auf dem Bildschirm 
interagiert. Die vier Farbmodi sind: 


0:Normal 

1:XOR (exklusives ODER) 
2:AND 

3:0R 


Verwandte Befehle: GRAPHICS PEN, PLOT 


POKE 
POKE -Adresse>, «ganzzahliger Ausdruck> 


18 FOR m=49152 TO 65535 
20 POKE m,100 

3@ NEXT 

run 


KOMMANDO: Schreibt den Wert des <ganzzahligen Ausdrucks> (Bereich 0 bis 
255) direkt in den Z80 Speicher (RAM) an der angegebenen Adresse. 


Mit Vorsicht anzuwenden! 


Verwandte Befehle: PEEK 
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POS 
POS (#Stream) 


10 MODE 1:BORDER @:LOCATE 8,2 

2@ PRINT "Benutze Cursor-Tasten rechts und links" 
30 WINDOW 1,480,12,12:CURSOR 1,1 

46 FOR n=1 TO 19:PRINT CHRS(9);=:NEXT 
5@ IF INKEY(1)<>-1 THEN PRINT CHRS$(9); 
60 IF INKEY(8)<>-1 THEN PRINT CHRS$(8); 
76 LOCATE #1,2,24 

8@ PRINT #41,"Text-Cursor "; 

90 PRINT #1,"horizontale Position ="; 
100 PRINT #1,P0S(#0):GOTO 50 

run 


FUNKTION: Gibt an, auf welchem Punkt der x-Achse, bezogen auf den linken 
Rand des Bildschirmbereichs, sich der Text-Cursor gegenwartig befindet. Der 
Stream--Parameter mu’ unbedingt angegeben werden, da _ sonst nicht 
automatisch Stream -0 angenommen wird. 


POS(#8) gibt die Position des Schreibkopfes im Drucker an, wobei 1 die erste 
Stelle innerhalb der Zeile bedeutet. 


POS (#9) Meldet die Anzahl der Zeichen, die seit dem letzten [RETURN] auf die 
Diskette geschrieben worden sind. 


Verwandte Befehle: VPOS, WINDOW 


PRINT 
PRINT [#-Stream: , ][:Ausgabeliste:] 


186 a$="klein" 

20 bS="Dies ist ein laengerer Text" 
30 PRINT a$;a$ 

40 PRINT a$,a$ 

5@ PRINT 

60 PRINT b$;b$ 

7@ PRINT b$,b$ 


KOMMANDO: Gibt die -Ausgabeliste’ auf dem angegebenen Stream aus (auf 
Stream #0, wenn nicht anders angegeben). 
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Ein Semikolon zwischen den einzelnen Ausdriicken der Ausgabeliste zeigt an, wo 
der nachste Ausdruck beginnt. BASIC priift, ob der nachste Ausdruck noch in die 
Zeile pat. Ist dies nicht der Fall, wird er in die nachste Zeile gesetzt. 


Ein Komma als Trennzeichen bedeutet, da der nachste Ausdruck in der 
nachsten Druckzone beginnt. Hat der vorhergehende Ausdruck seine Druckzone 
uberschritten, so beginnt der folgende Ausdruck in der nachsten freien Zone. 


PRINT SPC 
PRINT TAB 


PRINT [#:<Stream> , ]|-Ausgabeliste I ; | 
[SPC (.ganzzahliger Ausdruck: ) ||:Ausgabeliste> | 


PRINT [#-Stream>, ||-Ausgabeliste-]{ ; ] 
[TAB (.ganzzahliger Ausdruck: ) ][-Ausgabeliste: | 


10 PRINT "Dies ist die SPC-Funktion"” 
2@ FOR x=6 TO 15 

3@ PRINT SPC(5)"a";SPCCx)"b" 

40 NEXT 

5@ PRINT "Dies ist die TAB-Funktion" 
66 FOR x=6 TO 15 

70 PRINT TAB(5)"a"; TABCXx)"b" 

86 NEXT 


SPC druckt die im :ganzzahligen Ausdruck> angegebene Anzahl von Leerstellen 
und setzt den folgenden Ausdruck unmittelbar dahinter, vorausgesetzt, da er 
noch in die Zeile paBt. Ein Semikolon hinter SPC ertbrigt sich daher. 


TAB druckt, vom linken Rand des Textfensters aus beginnend, die angegebene 
Zahl von Leerstellen und setzt den folgenden Ausdruck unmittelbar dahinter, 
vorausgesetzt, da er noch in die Zeile pat. Ein Semikolon hinter TAB ertbrigt 
sich daher. Liegt der Cursor hinter der gewtinschten Position, so wird der nachste 
Ausdruck um eine Zeile nach unten versetzt. 
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PRINT USING 


PRINT [#-Stream: |[:Ausgabeliste: Jl; ] 
[USING -Formatschablone ]|:Trennzeichen>:Ausdruck> | 


10 FOR X=1 TO 16 

20 n=100000*(RNDT5) 

30 PRINT "Waren";USING "HHH#HHHH, HA" on 
40 NEXT 

run 


Mit diesem Befehl kénnen Sie das Format des Ausdrucks, den Sie durch den 
Print-Befehl erhalten, bestimmen. Der Ausdruck erscheint dann in der 
angegebenen «Formatschablone>. Trennzeichen sind Komma und Semikolon. Die 
‘Formatschablone> kann mit den folgenden Formatzeichen gebildet werden: 


Formate fiir numerische Ausgaben 
Innerhalb der Zahl: 


# Jedes # steht fiir eine Stelle. 
Beispiel: ###### 


Bestimmt die Position des Dezimalpunkts 
Beispiel: ######.## 


; (Steht fiir eine Stelle.) Kann nur VOR dem _ Dezimalpunkt 
erscheinen.Gibt an, da8 die Ziffern vor dem Dezimalpunkt in 
Dreiergruppen (zu Tausendern) eingeteilt werden sollen. 

Beispiel: ######,.## 


AuRerhalb der Zahl: 


£f (Steht fiir zwei Stellen.) Gibt an, da% unmittelbar vor der ersten Ziffer 
oder dem Dezimalpunkt, aber nach etwaigen, der Zah] vorangehenden 
Zeichen, ein £-Zeichen erscheinen soll. Beachten Sie, daB f eine Stelle 
in der Ziffernfolge einnimmt. 
Beispiel: ££######,.4# 


xk (Steht fir zwei Stellen.) Gibt an, daB vorangehende Leerstellen durch 


** angezeigt werden sollen. 
Beispiel: **######,.## 


Liste aller BASIC-Befehle Kapitel 3 Seite 63 


af 


$$ 


Kk 


baat 


(Steht fur drei Stellen.) Steht fiir eine Kombination aus ** und ff, 
dh. Sternchen ** und Pfund-Zeichen £ werden der Zahl 
vorangestellt. 

Beispiel: **£######,.## 


(Steht fiir zwei Stellen.) Gibt an, da8 unmittelbar vor der ersten 
Ziffer oder dem Dezimalpunkt, aber nach etwaigen, der Zahl 
vorangehenden Zeichen, ein $-Zeichen erscheinen soll. 

Beispiel: $$#####4,.## 


(Steht fir drei Stellen) Kombiniert die ** und $$ Anweisungen. 
Beispiel: **S$######,.## 


Je nach dem Wert der Zahl soll ein + oder ein - Zeichen 
vorangestellt werden. Erscheint + am Anfang der Formatschablone, 
wird das Zeichen vor die Zahl und eventuelle Wahrungszeichen 
gesetzt. Erscheint es am Ende der Formatschablone, wird + oder 
- hinter die Zahl und eventuelle Exponenten gesetzt. 

Beispiel: +####.#### 


Das Minuszeichen kann nur am Ende der Formatschablone 
erscheinen. Es bewirkt, dal} das Zeichen hinter jede negative Zahl 
(und ihre Exponenten) gesetzt wird. Ist die Zahl positiv, wird eine 
Leerstelle ausgedruckt. Wird in der Formatschablone kein 
Minuszeichen angegeben, erscheint VOR jeder negativen Zahl 
automatisch ein Minuszeichen.Beispiel: #### .####- 


Gibt an, daB die Zah] in Exponentialschreibweise dargestellt werden 
soll. Dieses Zeichen sollte hinter den Zifferzeichen, jedoch vor 
angehangten + oder - Zeichen stehen. 

Beispiel: #.####7 7 T T+ 


Die :Formatschablone> fiir Zahlen darf nicht mehr als 20 Zeichen enthalten. 


Reicht die Formatschablone fir einen Ausdruck nicht aus, z.B.: 


PRINT USING "####"; 12345678 


..So wird der Ausdruck nicht gektirzt, um in die Schablone zu passen, sondern in 
seiner ganzen Lange ausgedruckt, wobei ein % Zeichen vorangestellt wird, um 
anzudeuten, daf} das Format nicht eingehalten wurde. 
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Formate fir Strings 


16 CLS:a$="abcdefghijklmnopqrst" 


20 PRINT "eingegebener Ausdruck= ";a$ 

3@ PRINT:PRINT "! Formatzeichen= "; 

4@ PRINT USING "!":a$ 

50 PRINT:PRINT "\Leerzeichen\ Formatzeichen= "; 
6@ PRINT USING "\ \";a$ 

7@ PRINT:PRINT "& Formatzeichen= "; 

88 PRINT USING "&";a$ 

90 GOTO 98 

run 


| Gibt an, da8 nur das erste Zeichen des Strings gedruckt werden soll. 


Beispiel: ! 


\Leerstellen> \ 


Gibt an, daf nur die ersten x Zeichen des Strings gedruckt werden sollen, wobei 
x einschlieBlich der Schragstriche der Lange der Schablone entspricht. 


Beispiel: \ 


\ 


&  Gibtan, da8 der gesamte String wie vorgegeben gedruckt werden soll. 


Beispiel: & 


Die .Formatschablone: darf nicht tiber 255 Stellen hinausgehen. 


Formatschablonen sowohl fiir numerische Angaben als auch fir Strings kénnen 
durch Stringvariablen dargestellt werden, z.B.: 


10 aS="#HHHHHHH, HH" 

28 bS="!" 

3@ PRINT USING a$;12345.6789; 
40 PRINT USING b$;"Pfennig" 


Weitere Informationen tiber Formatschablonen finden Sie im 2.Teil des 9. Kapitels. 


Verwandte Befehle: SPC, TAB, USING, ZONE 
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RAD 
RAD 
RAD 


KOMMANDO: Schaltet auf Ausgabe in Bogenmaf (engl. radians) um. BASIC 
gibt automatisch Bogenmafiwerte aus, wenn der Computer angeschaltet oder 
zurickgesetzt wird, oder nach Kommandos wie NEW, CLEAR und LOAD, RUN. 


Verwandte Befehle: ATN, COS, DEG, SIN, TAN 


RANDOMIZE 
RANDOMIZE |-numerischer Ausdruck: | 


18 RANDOMIZE 123.456 
28 PRINT RND 
8.258852139 


KOMMANDO: Setzt den Anfangswert fiir den Zufallszahlengenerator. In BASIC 
werden Zufallszahlen in Abhangigkeit von einem gegebenen Startwert erzeugt. 
Die Zahlenfolge steht fest. Der Anfangswert kann durch den Parameter 
numerischer Ausdruck: festgesetzt werden. Wird der Parameter ausgelassen, 
mu der Benutzer ihn angeben, wenn er vom Computer gefragt wird: ‘Random 
number seed?’ 

Mit RANDOMIZE TIME wird eine nahezu unwiederholbare Zahlenfolge erzeugt. 


Verwandte Befehle: RND 


READ 
READ .Liste von::Variablen> 


18 FOR n=1 TO 8 

20 READ a$,c 

38 PRINT a$;" ";:SOUND 1,c:NEXT 

40 DATA hier,478,sind,426,8,379,Noten 

5@ DATA 358,von,319,einer,284,T0n,253,leiter,239 


KOMMANDO: Liest (engl. read) Daten aus DATA-Anweisungen und ordnet sie 
den angegebenen Variablen der Reihe nach zu. Das RESTORE-Kommando setzt 
den Zeiger wieder auf den ersten DAT A-Wert. 


Weitere Einzelheiten tiber Daten erfahren Sie im 2.Teil des 9. Kapitels. 


Verwandte Befehle: DATA, RESTORE 
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RELEASE 
RELEASE -Kanale> 


18 SOUND 65,1000,100 

20 PRINT "Druecke R, um Ton zu erzeugen" 
36 IF INKEY(5@)=-1 THEN 30 

48 RELEASE 1 

run 


KOMMANDO: Hebt den Wartezustand, in dem sich die Kanadle aufgrund des 
SQUND-Befehls befinden, auf. 


Fur den Parameter :Kanale> kénnen ganze Zahlen zwischen 1 und 7 angegeben 
werden, die folgende Bedeutung haben: 


: gibt Kanal A frei 

: gibt Kanal B frei 

: gibt Kanale A und B frei 

: gibt Kanal C frei 

: gibt Kandle A und C frei 

: gibt Kandle B und C frei 

: gibt Kanale A, B und C frei 


Weitere Informationen tiber Tonerzeugung finden Sie im 2.Teil des 9. Kapitels. 


AMD OP WDNR 


Verwandte Befehle: SOUND 


REM 
REM -Rest der Zeile> 


18 REM Intergalactic Hyperspace Mega-Monster 
Invaders Deathchase by AMSOFT 
2@ REM Copyright AMSOFT 1985 


KOMMANDO: Fiigt Kommentarzeilen (engl. REMarks) in das Programm ein. 
Alle Zeichen von REM bis zum Ende der Zeile werden von BASIC ignoriert, 
einschlieBlich des Doppelpunktes, der normalerweise Befehle trennt. 


Anstelle von REM kann das einfache Anfiihrungszeichen ' verwendet werden, 
auBer in DATA-Anweisungen, wo ' als Teil eines Zitats behandelt wird. 


Verwandte Befehle: keine 
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REMAIN 
REMAIN -Zeitgeber> 


1@ AFTER 5808,1 GOSUB 40 

20 AFTER 100,2 GOSUB 58 

3@ PRINT “Programm laeuft":GOTO 36 

40 REM Dieses GOSUB-Unterprogramm wird nicht aufgerufen 
, da es durch Zeile 8@ ausser Kraft gesetzt wird. 

5@ PRINT:PRINT "Zeitgeber 1 ist jetzt "; 

6@ PRINT "durch REMAIN ausser Kraft gesetzt." 

7@ PRINT "Verbleibende Zeiteinheiten :"; 

8@ PRINT REMAIN(1) 

run 


FUNKTION: Gibt die verbleibende (engl. REMAINing) Restzeit des -Zeitgebers> 
(Bereich 0 bis 3) an und setzt ihn aufer Kraft. 


Weitere EKinzelheiten iber Unterbrechungen finden Sie im 2.Teil des 9. Kapitels. 
Verwandte Befehle: AFTER, DI, EI, EVERY 


RENUM 
RENUM [neue Zeilennummer. |[ ,[:alte Zeilennummer  |[ , Schrittweite>]] 


18 CLS 

28 REM dies wird Zeile 123 
38 REM dies wird Zeile 124 
46 REM dies wird Zeile 125 
RENUM 123,20,1 

LIST 


KOMMANDO: Numeriert das Programm um (engl. RENUMber). 

Die «alte Zeilennummer: gibt an, ab welcher Zeile neu numeriert werden soll. 
Wird dieser Parameter ausgelassen, beginnt die neue Numerierung in der ersten 
Programmzeile. 

Die «neue Zeilennummer: gibt an, wie die erste umnumerierte Zeile heiSBen soll. 
Wird dieser Parameter ausgelassen, heiBt die erste neue Zeilennummer 19. 

Die ‘Schrittweite> bestimmt die Abstande zwischen den einzelnen Zeilennummern. 
Wird dieser Parameter ausgelassen, betragen die Abstande automatisch 10. 

In allen GOSUB- und GOTO-Befehlen und anderen Zeilenverweisen werden die 
Zeilennummern geandert. Zeilenangaben innerhalb von Strings, wie z.B. in 
KEY-Befehlen, werden jedoch nicht geandert, ebensowenig wie in REM-Aussagen 
und in den  <Zeilennummer-Parametern in CHAIN- und CHAIN 
MERGE-Befehlen. 


Die Zeilennummern kénnen von 1 bis 65535 reichen. 
Verwandte Befehle: DELETE, LIST 
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RESTORE 
RESTORE [-Zeilennummer | 


18 READ a$:PRINT a$;" "; 

28 RESTORE 5@ 

30 FOR t=1 TO 5S@B:NEXT:GOTO 10 

4@ DATA Mit RESTORE kann man Daten noch einmal lesen 
5@ DATA und noch einmal 


KOMMANDO: Setzt den Zeiger zuritick auf die DATA-Anweisung in der 
angegebenen Zeile. Wird die :Zeilennummer> nicht angegeben, so geht der Zeiger 
auf die erste DAT A-Anweisung im Programm zuriick. 


Weitere Informationen zu DATA-Anweisungen finden Sie im 2.Teil des 9. 
Kapitels. 


Verwandte Befehle: DATA, READ 


RESUME 
RESUME [-Zeilennummer | 


18 ON ERROR GOTO 68 

26 FOR x=1@ TO @ STEP-1:PRINT 1/x:NEXT 

3@ END 

46 PRINT "gehe hierher, wenn ein Fehler auftritt" 
5@ END 

6@ PRINT "Fehler Nr.";ERR;"in Zeile";ERL 

7@ RESUME 46 


KOMMANDO: Veranlaft das Programm, in der nachsten Zeile oder bei der 
angegebenen -Zeilennummer weiterzumachen, wenn es aufgrund eines ON 
ERROR GOTO-Sprungs unterbrochen wurde. Wird die :Zeilennummer> nicht 
angegeben, macht das Programm in der Zeile weiter, wo der Fehler aufgetreten 
ist. Entfernen Sie probeweise den <Zeilennummer-Parameter aus dem 
Beispielprogramm und lassen Sie das Programm erneut laufen. 


7@ RESUME 
run 


Verwandte Befehle: DERR, ERL, ERR, ERROR, ON ERROR GOTO, RESUME 
NEXT 
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RESUME NEXT 
RESUME NEXT 


18 ON ERROR GOTO 96 

20 PRINT "“druecke jedesmal CRETURN]" 
3@ INPUT "1";a 

48 INPUT "2":a 

58 inpot "3";a :REM syntax error! 

6@ INPUT "4"7a 

79 INPUT "5"7a 

8@ END 

9@ PRINT “Fehler Nr."ZERR;"in Zeile";ERL 
188 RESUME NEXT 

run 


KOMMANDO: Nimmt das Programm wieder auf (engl. resume), nachdem ein 
Fehler aufgetreten ist und die ON ERROR GOTO-Anweisung ausgefiihrt wurde. 


Das Programm lauft ab der Zeile weiter, die der Zeile mit dem Fehler folgt. 


Verwandte Befehle: DERR, ERL, ERR, ERROR, ON ERROR GOTO, RESUME 


RETURN 
RETURN 


18 GOSUB 50:PRINT "nach dem GOSUB-": END 
5@ FOR n=1 TO 20 

60 PRINT "Unterprogramm" 

70 NEXT:PRINT 

88 RETURN 


KOMMANDO: Steht am Ende eines Unterprogramms. BASIC kehrt vom 
Unterprogramm zu der Anweisung zuriick (engl. return), die dem Aufruf des 
Unterprogramms folgt. 


Verwandte Befehle: GOSUB 
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RIGHT$ 
RIGHT$ (.String:,.Lange: ) 


10 MODE 1:a$="CPC6128 Computer" 
20 FOR n=1 TO 16:LOCATE 41-n,n 
3@ PRINT RIGHT$(a$,n) 

408 NEXT 

run 


FUNKTION: Gibt den :String: in der angegebenen «Lange» (Zeichenanzahl 0 bis 
255) wieder. Dabei wird der $tring von rechts (engl. right) beginnend in jeder 
Zeile um ein Zeichen verlangert. Ist er kurzer als der .Langen--Parameter angibt, 
wird der ganze String entsprechend oft wiederholt. 


Verwandte Befehle: LEFT$, MIDS 


RND 
RND [€-numerischer Ausdruck>) | 


19 RANDOMIZE 

2@ FOR x=1 TO -1 STEP -1 

30 PRINT “rnd Parameter=";x 
4@ FOR n=1 TO 6 

5@ PRINT RND(x) 

60 NEXT n,x 


FUNKTION: Gibt die nachste Zufallszahl (engl. RaNDom number) in der 
betreffenden Folge wieder, wenn der numerische Ausdruck> positiv ist oder nicht 
angegeben wird. 


Wird 0 als Parameter gewahlt, so wird die letzte Zufallszah] wiederholt. 


Wird fir den Parameter eine negative Zahl eingesetzt, so wird eine neue Folge 
von Zufallszahlen ausgegeben, deren erste Zahl sich immer wiederholt. 


Verwandte Befehle: RANDOMIZE 
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ROUND 
ROUND (:numerischer Ausdruck>[ ,:Dezimalstellen:]) 


10 FOR n=4 TO -4 STEP-1 

20 PRINT ROUND (1234.5678,n), 
3@ PRINT "Dezimalstellen: ";n 
40 NEXT 

run 


FUNKTION: Rundet (engl. round) den :numerischen Ausdruck> zu einer Zahl mit 
sovielen Dezimalstellen oder Zehnerpotenzen, wie der .Dezimalstellen»-Parameter 
angibt. Ist der Dezimalstellen-Parameter negativ, wird der -numerische 
Ausdruck> zu einer ganzen Zahl mit sovielen Nullen vor dem Komma gerundet, 
wie der Dezimalstellen’-Parameter angibt. 


Verwandte Befehle: ABS, CINT, FIX, INT 


RUN © 


RUN «String> 
RUN "disc" 


KOMMANDO: Ladt ein BASIC-Programm von der Diskette in den Rechner und 
startet (engl. run) es. Hierbei wird jedes vorher geladene Programm aus dem 
Speicher geldscht. 


Geschiitzte BASIC-Programme kénnen auf diese Weise direkt gestartet werden. 


Verwandte Befehle: LOAD 


RUN 
RUN [-Zeilennummer |] 
RUN 206 


KOMMANDO: Startet ein im Speicher befindliches Programm von vorn oder ab 
der angegebenen <Zeilennummer>. Die Werte aller im Programm befindlichen 
Variablen werden auf Null gesetzt. 


Geschiitzte Programme kénnen nach dem Laden NICHT auf diese Weise gestartet 
werden. 


Verwandte Befehle: CONT, END, STOP 
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SAVE 


SAVE Dateiname>| ,:Dateityp: || ,.Binardateiparameter ] 

SAVE "Programm.xyz" 
... Speichert das Programm als normale, ungeschtitzte BASIC-Datei. 

SAVE "Programm.xyz",P 
... Speichert das Programm als geschtitzte BASIC-Datei. 

SAVE "Programm.xyz",A 
... Speichert das Programm als ASCII-Datei. 

SAVE "Programm.xyz",B,8000,3000,8001 

speichert das Programm als Binardatei. In diesem Beispiel wird der 

Speicherbereich des Computers ab der Speicheradresse 88@@ gespeichert. Der 


Umfang der Datei betragt 3888 Bytes und die Adresse des Anfangspunkts ist 
8001. 


KOMMANDO: Schreibt das im Speicher befindliche Programm auf Diskette. Eine 
Binardatei ist ein auf Diskette tbertragener Speicherbereich. Die 
Binardatei-Parameter sind: 


‘Startadresse, -Dateilange| ,.Anfangspunkt>] 


Die Bildschirmanzeige kann als Binardatei gespeichert werden. Solch ein 
Bildschirmabdruck erfolgt durch den Befehl: 


SAVE "Bild",B,&C000,8&4000 
..und mit dem Befehl: 
LOAD "Bild" 


..kann das Bild wieder auf den Bildschirm geholt werden. 


Verwandte Befehle: CHAIN, CHAIN MERGE, LOAD, MERGE, RUN 
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SGN 


SGN (mnumerischer Asudruck: ) 


16 FOR n=260 TO -20@ STEP-20 
20 PRINT 'Fuer den Wert";n; 
30 PRINT “gibt SGN"; 

4Q PRINT SGN(n); 

5@ PRINT "an." 

60 NEXT 


FUNKTION: Gibt das Vorzeichen (engl. SiGN) des .numerischen Ausdrucks> an. 
Ist der «numerische Ausdruck> kleiner als 0, erscheint -1, ist er gleich 0, erscheint 
0, und ist er gréRer als 0, erscheint 1. 


Verwandte Befehle: ABS 


SIN 


SIN (mumerischer Ausdruck: ) 


16 CLS:DEG:ORIGIN 0,208 

26 FOR n=8 TO 720 

3@ y=SIN(n) 

46 PLOT n*640/720,198*y:NEXT 
5@ GOTO 50 


FUNKTION: Berechnet den Sinus des :numerischen Ausdrucks>. 


Mit den Befehlen DEG und RAD kann das Ergebnis in Winkelgrade bzw. 
Bogengrade umgewandelt werden. 


Verwandte Befehle: ATN, COS, DEG, RAD, TAN 
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SOUND 


SOUND -Kanalstatus> , :Tonperiode>| ,.Dauer>[ ,:Lautstarke- 
[, Lautstarkenhillkurve| ,:Tonhillkurve| ,.Gerauschperiode> ]]]|] 


18 FOR z=@ TO 4695 
20 SOUND 1,2z,1,12 
3@ NEXT 

run 


KOMMANDO: Erzeugt einen Ton. Der Befehl hat folgende Parameter: 


Parameter 1: «Kanalstatus> 


Fir ‘Kanalstatus» muB eine ganze Zahl zwischen 1 und 255 angegeben werden. 
Der Parameter ist Bit-signifikant. Die einzelnen Bits aus dem Binarwert von 
‘Kanalstatus> haben folgende Bedeutung: 


Bit Dezimalwert Kommando 


Oo 1 Ton wird zum Kanal A geschickt 
1 2 Ton wird zum Kanal B geschickt 
2 #4 Ton wird zum Kanal C geschickt 
3 8 Rendezvous mit Kanal A 

4 16 Rendezvous mit Kanal B 

5 ©6382 Rendezvous mit Kanal C 

6 64 Halte den Tonkanal 

7 128 Leere den Tonkanal 


Wird also z.B. der Wert 64 fiir ‘Kanalstatus: eingesetzt, bedeutet dies: Der Ton 
wird zum Kanal C (4) geschickt und dort gehalten (64). 


Parameter 2: :Tonperiode> 


Dieser Parameter bestimmt die Tonhéhe, d.h. die Note, die gespielt werden soll. 
Fur jede Note ist eine Zahl festgelegt, die fir die ‘Tonperiode> eingesetzt wird. 
Siehe Kapitel 7, Teil 5. 


Parameter 3: «Dauer> 


Dieser Parameter setzt die Dauer eines Tones fest. Der Wert bestimmt, wieviele 
Hundertstelsekunden der Ton dauert. Wird die ‘Dauer> nicht angegeben, wird als 
Standardwert 20 (= 1/5 Sekunde) angenommen. 


Ist der Wert 0, so dauert der Ton bis zum Ende der Lautstarkenhitllkurve. 
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Ist der ‘Dauer:-Parameter negativ, wird die Lautstarkenhtllkurve dem positiven 
Wert der Zah] entsprechend oft wiederholt. 


Parameter 4: :Lautstarke> 


Dieser Parameter bestimmt die Lautstarke am Anfang des Tones. Der 
Wertebereich liegt zwischen 0 und 15 (0= keine Lautstarke, 15= maximale 
Lautstarke). Wird keine Zahl angegeben, wird als Standardwert 12 angenommen. 


Parameter 5: «Lautstarkenhillkurve> 


Um die Lautstarke eines Tones wahrend seiner Dauer zu variieren, kann mit 
Hilfe des Befehls ENV eine :Lautstarkenhillkurve: definiert werden. Dazu stehen 
15 verschiedene Hillkurven zur Verfiigung (Wertebereich 1 bis 15). Der 
‘Lautstarkenhillkurve-Parameter im SOUND-Befehl  entspricht der 
Lautstarkenhtillkurven-Nummer im ENV-Befehl. 


Siehe auch Beschreibung des ENV-Befehls. 


Parameter 6: :Tonhitillkurve> 


Um die Tonhéhe eines Tones wahrend seiner Dauer zu variieren, kann mit Hilfe 
des ENT-Befehls eine Tonhillkurve definiert werden. Dazu stehen 15 
verschiedene Tonhtllkurven zur Verfiigung (Wertebereich 1 bis 15). Der 
‘Tonhillkurve--Parameter im SOUND-Befehl entspricht der 
Tonhillkurven-Nummer im ENT-Befehl. Haben Sie im ENT-Befehl eine negative 
Hullkurven-Nummer angegeben, benutzen Sie den positiven Wert der Zahl im 
‘Hullkurven>-Parameter des SOUND-Befehls. 


Siehe auch Beschreibung des ENT-Befehls. 


Parameter 7: :Gerduschperiode: 

Weifes Rauschen kann den Ton in verschiedenen Varianten begleiten oder 
abgeschaltet werden. Der Wertebereich fiir den .Gerduschperiode--Parameter 
liegt zwischen 0 und 31. 


Weitere Einzelheiten tiber die Tonerzeugung finden Sie im 2.Teil des 9. Kapitels. 


Verwandte Befehle: ENT, ENV, ON SQ GOSUB, RELEASE, SQ 
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SPACES 
SPACES («ganzzahliger Ausdruck> ) 


16 MODE 1 

206 PRINT "Zwischen hier"; 

30 PRINT SPACE$(9); 

40 PRINT "und dort " 

5@ PRINT "Liegen 9 Leerstellen" 
run 


FUNKTION: Gibt einen $tring aus, der aus der angegebenen Anzahl (0 bis 255) 
von Leerzeichen (engl. space) besteht. 


Verwandte Befehle: SPC, STRINGS, TAB 


SPC 


siehe PRINT SPC 


SPEED INK 
SPEED INK -Periode 1: ,<Periode 2> 


1@ BORDER 7,18 

20 FOR i=30 TO 1 STEP -1 
3@ SPEED INK i,i 

40 FOR t=1 TO 7@0:NEXT t,i 
run 


KOMMANDO: Setzt die Geschwindigkeit fest, mit der sich die beiden im 
INK-oder BORDER-Befehl angegebenen Farben abwechseln sollen. <Periode 1> 
setzt die Farbdauer fiir die erste Farbe, Periode 2) die Farbdauer fiir die zweite 
Farbe fest. Die Zeitdauer wird in Einheiten zu 0.02 Sekunden, oder 
Fiinfzigstelsekunden, gemessen. 


Wahlen Sie die Farben und ihre Farbdauer sorgfaltig aus, um hypnotische 
Effekte zu vermeiden. 


Verwandte Befehle: BORDER, INK 
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SPEED KEY 
SPEED KEY -Startverzégerung> , .Wiederholungsperiode- 


16 CLS:FOR k=7 TO 1 STEP-2 
20 PRINT "Schreibe deinen Namen und druecke die 
CRETURNI] Taste" 

30 SPEED KEY k,k 

4@ LINE INPUT a$:NEXT 

50 PRINT "Komischer Name!" 

run 
KOMMANDO: Legt fest, in welchen Zeitabstanden sich ein Zeichen in 
Dauerfunktion wiederholt. Der Wert fiir den <Startverzdgerungs--Parameter 
bestimmt, wieviel Funfzigstelsekunden (0,02 Sekunden) bis zum Einsetzen der 
Dauerfunktion verstreichen sollen. Der «Wiederholungsperioden--Parameter gibt 
an, in welchen Zeitabstanden eine Taste in Dauerfunktion angeschlagen wird. 
Der Befehl SPEED KEY 148t sich nur auf Tasten anwenden, die standardmahig 
mit Dauerfunktion ausgestattet sind, oder auf Tasten, die durch KEY DEF auf 
Dauerfunktion geschaltet wurden. 
Wenn Sie fir ‘Startverzégerung> kleine Werte einsetzen méchten, ist es ratsam, 
vorher eine Zahlentaste so zu programmieren, da8 die Tastatur zu ihrem SPEED 
KEY Standard-Tempo von 30,2 zuriickkehrt. Durch den Befehl: 


KEY @,"SPEED KEY 30,2"+CHR$(13) 


..kehrt die Dauerfunktion zum Standardtempo zuriick, wenn die 0 auf der 
Zahlentastatur gedriickt wird. 


Verwandte Befehle: KEY DEF 


SPEED WRITE 
SPEED WRITE «ganzzahliger Ausdruck> 
SPEED WRITE 1 


KOMMANDO: Bestimmt, mit welcher Geschwindigkeit Daten auf eine 
angeschlossene Kassette gespeichert oder geschrieben werden. Lautet der 
«ganzzahlige Ausdruck> 1, so wird die Kassette mit 2000 Baud (Bits pro Sekunde) 
beschrieben. Wird der Wert 0 angegeben, betragt die Schreibgeschwindigkeit 
1000 Baud (Standardgeschwindigkeit). Beim Laden einer Datei von der Kassette 
wahlt der Computer automatisch die richtige Lesegeschwindigkeit. 

Um eine bessere Datensicherheit zu gewahrleisten, empfiehlt es sich, SPEED 
WRITE @ (die Standardgeschwindigkeit) zu wahlen. 


Der SPEED WRITE-Befehl ist ohne Bedeutung fiir den Diskettenbetrieb. 
Verwandte Befehle: OPENOUT, SAVE 
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SQ 
SQ (.Kanal>) 


18 SOUND 65,168,100 
20 PRINT SQ@(1) 

run 

67 


FUNKTION: Gibt die Anzahl der freien Platze in der Tonwarteschlange (engl. 
Sound Queue) des durch 1,2 oder 4 bezeichneten Kanals an, wobei 


1 fir Kanal A 
2 fir Kanal B und 
4 far Kanal C steht. 


Die $Q-Funktion gibt eine Bit-signifikante ganze Zahl an, wobei die Bits 
folgendes aussagen: 


Bits 0,1 und 2: die Anzahl der freien Platze in der Warteschlange 

Bits 3,4 und 5: Rendezvous-Zustand am oberen Ende der Schlange 

Bit 6: das obere Ende der Schlange befindet sich im Haltezustand 
Bit 7: der Kanal ist gerade aktiv 


Bit 0 hat dabei die niedrigste, Bit 7 die héchste Signifikanz. 


Daraus ergibt sich, daB Bit 7 nicht gesetzt werden kann, wenn Bit 6 gesetzt ist, 
und umgekehrt. Ebensowenig kénnen Bits 6 und 7 gesetzt werden, wenn die Bits 
3,4 oder 5 gesetzt sind. 


Nahere Einzelheiten uber die Erzeugung von Ténen finden Sie im 2.Teil des 9. 
Kapitels. 


Verwandte Befehle: ON SQ GOSUB, SOUND 


SQR 
SQR (.numerischer Ausdruck> ) 


PRINT SQR(9) 
3 


FUNKTION: Gibt die Quadratwurzel (engl. SQuare Root) des angegebenen 
numerischen Ausdrucks> wieder. 


Verwandte Befehle: keine 
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STEP 


(Siehe FOR) 


STOP 
STOP 


1@ FOR n=1 TO 36:PRINT n:NEXT 
26 STOP 

3@ FOR n=31 TO 6@:PRINT n:NEXT 
run 

cont 


KOMMANDO: Stoppt das Programm, bela&8t BASIC jedoch in einem 
Unterbrechungszustand, so daB das Programm mit dem CONT-Befehl wieder 
fortgesetzt werden kann. Das Kommando kann dazu benutzt werden, ein 
Programm zu Testzwecken an einer bestimmten Stelle zu unterbrechen. 


Verwandte Befehle: CONT, END 


STRS$ 
STR$ (.mumerischer Ausdruck> ) 


10 a=&FF :REM 255 hexadezimal 
20 b=&X1111 :REM 15 dual 


30 chatewn" 
4@ PRINT c$+STR$Catb)+t+c$ 
run 


ake 27 Gkk* 
FUNKTION: Verwandelt den :numerischen Ausdruck> in einen Dezimal-String. 
Verwandte Befehle: BINS, DEC$, HEX$, VAL 
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STRING$ 
STRINGS (.Lange> ,:Textzeichen> ) 


PRINT STRINGS(40,"*") 
KR KKK IK RIK KR REIKI EK RRR REAR RKRK RE KRKREKE 


FUNKTION: Gibt einen String aus, der das angegebene -Textzeichen> so oft 
(zwischen 0 und 255 mal) enthalt, wie im <ganzzahligen Ausdruck> angegeben. 
Dasselbe Ergebnis wird erzielt, wenn, man folgendes eingibt: 


PRINT STRING$(40,42) 


RREKEKEKREKEKEKEKEKRKEKRKEKKEEKKEKEKREKKEKKKEKKKEKKKKEKK 


Hier entspricht das ‘Textzeichen» 42 dem ASCII-Wert des Zeichens *. Es ist eine 
andere Form des Befehls: 


PRINT STRINGS(4@,CHRS$(42)). 
Verwandte Befehle: SPACES 


SWAP 
(Siehe WINDOW SWAP) 


SYMBOL 


SYMBOL :Zeichennummer: , :Liste von: «Zeilen> 


18 MODE 1:SYMBOL AFTER 105 

20 Zeile1=255:REM binary 11111111 

30 Zeile2=129:REM binary 18000001 

46 Zeile3=189:REM binary 181111681 

5@ Zeile4=153:REM binary 10011001 

6@ Zeile5=153:REM binary 180011001 

70 Zeile6=189:REM binary 180111101 

86 Zeile7=129:REM binary 10000001 

98 Zeile8=255:REM binary 11111111 

180 PRINT "Zeile 118 belegt den Buchstaben i (105) 
mit einem neuen Wert. Tippe ein paar i's und 
sieh, was herauskommt. Liste nun das Programm auf." 

110 SYMBOL 105,Zeilei,Zeile2,Zeile3,Zeile4,Zeiles, 
Zeile6,Zeile/7,Zeilesg 

run 


KOMMANDO: Verandert die Form eines Zeichens auf dem Bildschirm. Jeder 
Parameter mui eine ganze Zahl zwischen 0 und 255 enthalten. 
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Um Platz im Speicher des CPC6128 fiir das neudefinierte Zeichen zu schaffen, 
mu erst der Befehl: 


SYMBOL AFTER x 


..erteilt werden, wobei x fiir die Nummer dieses Zeichens steht, oder kleiner ist 
als diese. 


Erst dann kann der Befehl SYMBOL eingesetzt werden, dem immer als erstes die 
Zeichenummer folgen muB. 


Unabhangig davon, ob der Wert fiir x ein Zeichen reprasentiert, das direkt 
eingetippt werden kann, ist es méglich, das umdefinierte Zeichen mit folgendem 
Befehl auf den Bildschirm zu bringen: 


PRINT CHRS$(x) 


Nach SYMBOL(x) kénnen bis zu acht Parameter angegeben werden, die von 
oben nach unten die acht Zeilen darstellen, aus denen jedes Zeichen 
zusammengesetzt ist. Jeder dieser Parameter kann Werte zwischen 0 und 255 
aufweisen. Der bindre Ausdruck jedes Parameters bestimmt das Muster der 
betreffenden Reihe im neudefinierten Zeichen. 


Lautet der erste der acht Parameter z.B. 1, so erhalt die oberste Reihe des neuen 
Zeichens das Aussehen des bindren Ausdrucks fiir 1, namlich 00000001. Der 
Punkt, an dem die 1 des binaren Ausdruck steht, erscheint in der Schrift-Farbe, 
wahrend uberall dort, wo der bindre Ausdruck eine 0 aufweist, das Zeichen 
unsichtbar bleibt, da es in der ‘Papier’-Farbe gedruckt wird. Das neue Zeichen 
wirde also in diesem Beispiel oben rechts einen Punkt aufweisen. Wir fiihren 
dieses Beispiel fort und geben fiir die anderen sieben Parameter die Zahlen 
3,7,15,31,63,0,8 an. In bindrer Schreibweise sehen die acht Parameter dann 
folgendermafen aus: 


<Zeilen>-Parameter Binarzahl Dezimalzahl 


1 00000001 1 
2 00000011 3 
3 00000111 7 
4 00001111 15 
5 00011111 31 
6 00111111 63 
7 00000000 0 
8 00000000 0 


Wenn man sich die binare Schreibweise dieser acht Parameter ansieht, kann man 
bereits erkennen, wie das neue Zeichen aussehen wird. Wir ordnen jetzt die acht 
Parameter dem Zeichen Nummer 255 zu mit folgendem Befehl: 
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SYMBOL 255,1,3,7,15,31,63,0,8 

Der Wert 0 fiir die beiden letzten Parameter kann weggelassen werden: 
SYMBOL 255,1,3,7,15,31,63 

Die Parameter kénnen ebensogut in Binarform angegeben werden: 


SYMBOL 255,8&X@80000001,&X00000011,8X60000111,8&X80001111, 
&X80011111,&X80111111 


Dies erspart die Umwandlung des Bit-Musters fiir das neue Zeichen, das Sie sich 
ausgedacht haben, in Dezimalschreibweise. 


Sehen Sie sich jetzt das neue Zeichen an: 
PRINT CHR$(255) 


Wird das neue Zeichen einem Zeichen mit einer eigenen Taste zugeordnet, so 
erscheint das neue Zeichen jedesmal, wenn diese Taste gedriickt wird, und tiberall 
dort, wo der Computer das vorherige Zeichen ausgegeben hatte. BASIC wird auf 
das neue Zeichen nicht mit Unverstandnis reagieren, sondern es mit dem alten 
Zeichen gleichsetzen. Weitere Informationen tber selbstdefinierte Zeichen finden 
Sie im 2.Teil des 9. Kapitels. 


Verwandte Befehle: SYMBOLAFTER 


SYMBOL AFTER 
SYMBOL AFTER <ganzzahliger Ausdruck> 


18 CLS 

286 SYMBOL AFTER 115 

3@ PRINT "“Zeile 4@ definiert das s um "; 

40 SYMBOL 115,80,56,64,64,48,8,8,112 

50 PRINT "in s" 

608 PRINT "mache diese Definition von s rueckgaengig," 
70 PRINT "indem du schreibst: SYMBOL AFTER 248" 


KOMMANDO: Legt fest, wieviele Zeichen (0 bis 256) selbstdefiniert werden 
kénnen. Der Standardwert ist 240, d.h. 16 Zeichen kann der Benutzer selbst 
definieren (von 240 bis 255). Lautet der «ganzzahlige Ausdruck> 32, konnen alle 
Zeichen von 32 bis 255 neu definiert werden. Folglich kénnen nach dem Befehl 
SYMBOL AFTER 256 keine neuen Zeichen definiert werden. 
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Sobald der Befehl SYMBOL AFTER erscheint, erhalten alle selbstdefinierten 
Zeichen ihre urspriingliche Bedeutung wieder. 


Der Befehl funktioniert nicht (es sei denn, in der Form SYMBOL AFTER 256), 
wenn der Wert von HIMEM zuvor durch den MEMORY-Befehl oder durch 
Kroffnung eines Dateipuffers mit OPENIN oder OPENOUT geandert wurde. In 
diesem Fall erscheint Fehlermeldung 5 (Improper argument). 


Weitere Informationen tiber selbstdefinierte Zeichen finden Sie im 2.Teil des 9. 
Kapitels. 


Verwandte Befehle: HIMEM, MEMORY, SYMBOL 


TAB 


(Siehe PRINT TAB) 


TAG 
TAG [#-<Stream> | 


18 INPUT "Gib deinen Namen an";a$:CLs 

28 PRINT "Du kommst gewiss viel herum, “;a$ 
30 TAG 

40 x=LEN(Ca$)*17:y=50+RND*300:MOVE -x,y 

5@ FOR f=-x TO 648 STEP RND*7+3 

66 MOVE f,y:PRINT " ";a$;:FRAME:NEXT 

70 FOR b=648 TO -x STEP-RND*7+3 

8@ MOVE b,y:PRINT a$;" "3: FRAME:NEXT 

96 GOTO 48 


KOMMANDO: Der dem ‘Stream> zugeordnete Text erscheint immer dort, wo sich 
der Graphik-Cursor befindet. Auf diese Weise kénnen Text und Symbole mit der 
Graphik gemischt werden oder Bildpunkt fir Bildpunkt statt in Abstanden von 
ganzen Zeichen bewegt werden. Der Standardwert fiir Stream» ist 0, wenn kein 
Parameter angegeben wird. 


Die linke obere Ecke des Textzeichens liegt auf dem Graphik-Cursor. Nicht 
abdruckbare Kontrollzeichen, wie z.B. Wagenriicklauf und Zeilenvorschub werden 
als Sonderzeichen ausgegeben, wenn hinter dem PRINT-Kommando kein ; steht. 


Ist der <Stream>-Parameter 0, wird TAG abgeschaltet, sobald BASIC zum 
Direktmodus zurickkehrt. (TAG steht fiir “Text At Graphics”.) 


Verwandte Befehle: TAGOF F 
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TAGOFF 


TAGOFF [#:STREAM)] 


18 MODE 2:TAG :REM Text At Graphics-on 
20 year=1984:FOR x=1 TO 640 STEP 76 

3@ MOVE x,4Q@@:DRAWR @,-358 

40 year=year+1:PRINT year; :NEXT 

50 TAGOFF :REM Text At Graphics-OFF 

60 LOCATE 34,25:PRINT "Jahreszahlen" 
708 GOTO 708 

run 


KOMMANDO: Macht den TAG-Befehl fiir den angegebenen <Stream> (Stream 
#0, wenn nichts anderes angegeben wurde) riickgangig und setzt den Text wieder 
dorthin, wo sich der Text-Cursor vor dem T AG-Befehl befand. 


Verwandte Befehle: TAG 


TAN 


TAN (.numerischer Ausdruck> ) 


PRINT TAN(45) 
1.61977519 


FUNKTION: Berechnet den TANgens des <numerischen Ausdrucks>, der zwischen 
—200000 und + 200000 liegen muf. 


Beachten Sie, da8 das Ergebnis der obigen Berechnung mit Hilfe der Befehle DEG 
und RAD im Winkel- bzw. BogenmaS ausgedriickt werden kann. 


Verwandte Befehle: ATN, COS, DEG, RAD, SIN 


Liste aller BASIC-Befehle Kapitel 3 Seite 85 


TEST 


TEST (.x-Koordinate: ,:y-Koordinate: ) 


18 CLS 

20 PRINT "Sie benutzen PEN-Nummer"; 
3@ PRINT TEST(10,386) 

40 PRINT "Aendern Sie PENS und MODEs"; 
5@ PRINT "....dann wieder RUN." 


FUNKTION: Bewegt den Graphik-Cursor an den angegebenen absoluten 
x/y-Koordinatenpunkt und gibt die Nummer des Farbstifts an, der an dieser 
Position verwendet wurde. 


Verwandte Befehle: MOVE, MOVER, TESTR, XPOS, YPOS 


TESTR 
TESTR (.x-Versatz> ,<y-Versatz> ) 


18 MODE @:FOR x=1 TO 15:LOCATE 1,x 
2@ PEN x:PRINT STRING$(18,143); :NEXT 
30 MOVE 200,400:PEN 1 

46 FOR n=1 TO 23:LOCATE 12,n 

5@ PRINT "Schrift"; TESTR(B,-16) :NEXT 


FUNKTION: Verschiebt den Graphik-Cursor von seiner gegenwartigen Position 
um die angegebenen x- und y-Werte und gibt die Nummer des Farbstifts an, der 
an dieser Position verwendet wurde. 


Verwandte Befehle: MOVE, MOVER, TEST, XPOS, YPOS 


THEN 


(Siehe I F) 
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CLS:REM Uhr 

INPUT "Stunde'";Stunde 

INPUT "Minute";Minute 

INPUT "“Sekunde";Sekunde 
CLS:Uhrzeit=INT(TIME/300) 
WHILE Stunde<t3 
WHILE Minute<6@ 
WHILE Tick<6@ 
Tick=CINTC(TIME/3@0)-Uhrzeit)+Sekunde 
LOCATE 1,1 

PRINT USING "## ";Stunde,Minute,Tick 
WEND 
Tick=@:Sekunde=@:Minute=Minutet+1 
GOTO 5@ 

WEND 

Minute=@:Stunde=Stunde+1 

WEND 

Stunde=1 

GOTO 68 


FUNKTION: Gibt die Zeit (engl. time) an, die seit dem Einschalten des 
Computers bzw. seit dem letzten Zuriicksetzen vergangen ist. Dabei wird die Zeit 
fiir das Speichern auf Diskette bzw. Laden von Diskette abgezogen. 


Kine Einheit entspricht einer Dreihundertstelsekunde. 


Verwandte Befehle: AFTER, EVERY,WEND,WHILE 


TO 


(Siehe FOR) 
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10 TROFF:PRINT:PRINT "TRace-OFF" 
20 FOR n=1 TO 8 

30 PRINT "Programm laeuft":NEXT 
40 IF f=1 THEN END 

5@ TRON:PRINT:PRINT "TRace-ON" 
68 f=1:G0TO 2 


KOMMANDO: Mit TRON (TRace ON) kann die Ausfithrung eines Programms 
genau verfolgt (engl. trace) werden, da vor jeder Zeile die zugehdérige 
Programmzeile in eckigen Klammern [J] erscheint. Mit TROFF (TRace OF F) 
wird das Kommando TRON aufgehoben. 

TRON ist vor allem dann hilfreich, wenn bei der Ausfihrung eines Programms 
ein Fehler auftritt und man verfolgen méchte, wie das Programm vor dem Fehler 
ablief. 


Verwandte Befehle: keine 


UNT 
UNT (.Adressausdruck> ) 


PRINT UNTC&FF66) 
-154 


KOMMANDO: Gibt eine ganze Zahl (engl. inTeger) zwischen —32768 und +32767 
wieder, die das entsprechende Zweierkomplement des vorzeichenlosen (engl. 
UNsigned) «Adressen>-Wertes darstellt. 


Verwandte Befehle: CINT, FIX, INT, ROUND 
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UPPER$ 
UPPERS (.String:) 


18 CLS:a$="Wie gross du geworden bist!" 
26 PRINT UPPERS$(a$) 
run 


FUNKTION: Alle Buchstaben des angegebenen Strings werden in 
Grofschreibung wiedergegeben. Ein niitzliches Hilfsmittel, um Eingaben 
auszuwerten, die in gemischter Schreibweise eingegeben wurden. 


Verwandte Befehle: LOWERS 


USING 


(Siehe PRINT USING) 


VAL 
VAL (String>) 


10 CLS:PRINT "Ich kenne das kleine Einmaleins!" 
20 PRINT:PRINT "Druecke eine Taste (1 bis 9)" 
3@ aS=INKEYS$:IF a$=""" THEN 30 

40 n=VALCa$):1F n<1 OR n>9 THEN 30 

5@ FOR x=1 TO 18 

60 PRINT x;"X"sn;"="sxen 

76 NEXT:GOTO 20 


FUNKTION: Gibt den numerischen Wert (engl. VALue), einschlieBlich 
negativem Vorzeichen und Dezimalpunkt, des Zeichens wieder, das am Anfang 
des ‘Strings steht. 


Ist das erste Zeichen im String keine Zahl, wird 0 ausgegeben. Ist das erste 
Zeichen ein negatives Vorzeichen oder ein Dezimalpunkt, ohne dais eine Zahl 
folgt, erscheint die Fehlermeldung 13: Type mismatch’. 


Verwandte Befehle: STRS$ 
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VPOS 
VPOS (#<Stream>) 


1@ MODE 1:BORDER @:LOCATE 8,2 

20 PRINT "benutze die Cursor-auf/ab Tasten" 
38 WINDOW 39,39,1,25:CURSOR 1,1 

40 LOCATE 1,13 

5@ IF INKEY(@)<>-1 THEN PRINT CHR$(11); 
68 IF INKEY(2)<>-1 THEN PRINT CHR$(1@); 
78 LOCATE #1,3,24 

8@ PRINT #1,"Text-Cursor "; 

908 PRINT #1,"vertikale Position ="; 

180 PRINT #1,VPOS(#@):GOTO 50 

run 


FUNKTION: Gibt an, auf welchem Punkt der y-Achse, bezogen auf den oberen 
Rand des Bildschirmbereichs, sich der Text-Cursor gegenwartig befindet. Der 
‘Stream--Parameter mu wunbedingt angegeben werden, da sonst nicht 
automatisch Stream #@ angenommen wird. (VPOS steht fiir Vertical PO Sition) 


Verwandte Befehle: POS, WINDOW 


WAIT 
WAIT <Interfaceadresse> , Maske. , Inversion: ] 

WAIT &FF34,20,25 
KOMMANDO: Wartet, bis uber das  angesprochene Interface 
(Kin-/Ausgabeschnittstelle) ein bestimmter Wert zwischen 0 und 255 eingelesen 
ist. Der eingelesene Wert wird mit dem <Inversions-Wert entsprechend XOR 
(exklusives ODER) verglichen und, wenn das Ergebnis 0 ist, noch mit der Maske 
entsprechend AND, bis das Ergebnis nicht 0 ist. 
BASIC wartet solange, bis der geforderte Zustand hergestellt ist. 


Dieser Befehl sollte mit Vorsicht angewendet werden. 


Verwandte Befehle: INP, OUT 
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WEND 
WEND 
WEND 


KOMMANDO: SchlieBt eine WHILE-Schleife ab. WEND findet automatisch den 
zugehérigen WHI LE-Befehl. 


Verwandte Befehle: TIME, WHILE 


WHILE 
WHILE -logischer Ausdruck: 


10 CLS:PRINT "Zehn-Sekunden-Stoppuhr'":t=TIME 
2@ WHILE TIME<t+3009 

30 SOUND 1,80,1080,15 

46 WEND:SOUND 129,40,30,15 

run 


KOMMANDO: Wiederholt einen Programmteil solange. wie der <logische 
Ausdruck> zutrifft. WHILE bildet den Anfang der Schleife und definiert die 
Bedingung. 


Verwandte Befehle: TIME, WEND 


WIDTH 
WIDTH -ganzzahliger Ausdruck> 
WIDTH 40 


KOMMANDO: Gibt die Anzahl der Zeichen pro Zeile fiir die Druckerausgabe an. 
BASIC figt bei langeren Zeilen automatisch einen Wagenrticklauf und Vorschub 
auf eine neue Zeile ein. 


Wird WIDTH (dt. Breite) nicht angegeben, geht der Computer von einem 
Standardwert von 132 aus. 


Beim Befehl WIDTH 255 wird der Zeilenabschlu8 allein vom Drucker bestimmt. 
Wagenrticklauf und Zeilenvorschub kénnen in diesem Fall jedoch durch einen 
PRINT-Befehl ohne Semikolon oder Komma bewirkt werden. 


Verwandte Befehle: POS 
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WINDOW 
WINDOW [#-<Stream , ]dinks , rechts> ,<oben> , «unten 


10 MODE @:BORDER @:REM Testkarte 

20 INK @,@:INK 1,25:INK 2,23:INK 3,21 
30 INK 4,17:INK 5,6:INK 6,2:INK 7,26 
40 PAPER @:CLS 

5@ PAPER 1:WINDOW 2 
6@ PAPER 2:WINDOW 5 
70 PAPER 3:WINDOW 8 
88 PAPER 4:WINDOW 1 
90 PAPER 5:WINDOW 14, 16, 1,18:CLS 
100 PAPER 6:WINDOW 17,19, 1, 18:CLS 
110 PAPER 7:WINDOW 2,19,19 -25:CLS 
120 GOTO 128 

run 


KOMMANDO: Definiert Gré8e und Lage eines Bildschirmbereichs (Window). Die 
Werte fiir die Parameter <links>, <rechts>, «oben» und <unten> sollten so gewahlt 
werden, daB sie zum verwendeten Modus passen. 


Wird der Stream nicht angegeben, so wird Stream #@ (der ganze Bildschirm) 
angenommen. 


Weitere Informationen zu Bildschirmfenstern finden Sie im 2. Teil des 9. 
Kapitels. 


Verwandte Befehle: WINDOW SWAP 


WINDOW SWAP 
WINDOW SWAP <Stream> ,:Stream> 


1@ MODE 1:1INK 1,24:INK 2,9:INK 3,6 
20 WINDOW 21,480,13,25:PAPER 3 

30 WINDOW #1,1,20,1,12:PAPER #1,2 

46 CLS:PRINT " Fenster Nummer @" 

50 CLS #1:PRINT #1," Fenster Nummer 1" 
66 LOCATE 1,6 

7@ PRINT " rotes Fenster (@)";SPC(2) 
8B LOCATE #1,1,6 

96 PRINT #1," gruenes Fenster (1)" 
106 FOR t=1 TO 10@0:NEXT 

118 WINDOW SWAP @,1:GOTO 60 

run 
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KOMMANDO: Tauscht (engl. swap) die in den beiden <Streams> definierten 
Bildschirmbereiche gegeneinander aus.. 


Die Nummern der beiden Streams mtissen angegeben werden, jedoch sollte kein 
#-Zeichen vorangestellt werden. 


Der Befehl kann verwendet werden, um vom BASIC ausgegebene Meldungen, die 
normalerweise immer zu Stream #@ geschickt werden, umzuleiten. 


Weitere Informationen tiber ‘Windows’ finden Sie im 2.Teil des 9.Kapitels. 


Verwandte Befehle: WINDOW 


WRITE 
WRITE [#<Stream- , ][-Ausgabeliste>] 


18 REM Variablen auf Diskette schreiben 

29 INPUT "Gib eine Zahlenvariable an";a 

3@ INPUT "Gib eine Textvariable an";a$ 

48 OPENOUT "Datei" 

5@ WRITE #9,a,a$ 

68 CLOSEOQUT:PRINT "Daten auf Diskette gespeichert" 


KOMMANDO: Schreibt (engl. write) die in der -Ausgabeliste> aufgefiihrten Werte 
auf den angegebenen <Stream>. Die einzelnen Werte werden durch Kommata 
getrennt, Strings werden in Doppelanfiihrungszeichen eingeschlossen. 


Im obigen Beispiel werden die Werte der Variablen, die Sie eingegeben haben, 
auf Stream #9, also auf Diskette, geschrieben. 


Um die Werte wieder von der Diskette zuriickzuholen, miBte ein Programm wie 
das nachstehende eingesetzt werden: 


18 REM Variablen von Diskette abrufen 

20 OPENIN "Datei":INPUT #49,a,a$ 

3@ CLOSEIN:PRINT "Die beiden Werte heissen:" 
4@ PRINT:PRINT a,a$ 

run 


Verwandte Befehle: INPUT, LINE INPUT 
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XOR- 
‘Aussage’ XOR .Aussage> 


IF "Anna"<"Berta"™ XOR "Hund">"Katze" THEN PRINT “"richt 
ig" ELSE PRINT "falsch" 
falsch 


IF "Berta"<"Anna" XOR "Katze">"Hund" THEN PRINT "richt 
ig" ELSE PRINT "falsch" 
falsch 


IF “Anna"<"Berta" XOR "Katze">"Hund" THEN PRINT "richt 
ig" ELSE PRINT "falsch" 
richtig 


PRINT 1 XOR 1 
Y 
PRINT @ XOR @ 
) 
PRINT 1 XOR @ 
1 


OPERATOR: Fihrt Bit fiir Bit Boolsche Operationen mit ganzen Zahlen durch. 
Das Ergebnis ist 1, es sei denn, beide Argumente haben denselben Wert. 


Weitere Informationen tiber Logik finden Sie im 2.Teil des 9. Kapitels. 


Verwandte Befehle: AND, OR, NOT 


XPOS 

XPOS 
10 MODE 1:DRAW 320,208 
2@ PRINT "x-Koordinate des Graphik-Cursors ="; 
30 PRINT XPOS 


run 


FUNKTION: Gibt die x-Achse an, auf der sich der Graphik-Cursor gerade 
befindet. 


Verwandte Befehle: MOVE, MOVER, ORIGIN, YPOS 
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YPOS 
YPOS 


10 MODE 1:DRAW 320,208 

20 PRINT "y-Koordinate des Graphik-Cursors ="; 
38 PRINT YPOS 

run 


FUNKTION: Gibt die y-Achse an, auf der sich der Graphik-Cursor gerade 
befindet. 


Verwandte Befehle: MOVE, MOVER, ORIGIN, XPOS 


ZONE 


ZONE -ganzzahliger Ausdruck> 


18 CLS 

20 FOR z=2 TO 20 

38 ZONE z 

4@ PRINT "X","X zone ="7z 
58 NEXT 


KOMMANDO: Andert die Breite der Druckzonen, die fiir die einzelnen, durch 
Kommata getrennten Ausdrtcke aus dem Print-Befehl bereitstehen. Die Breite 
der Druckzonen kann zwischen 1 und 255 Stellen gewahlt werden. Die 
Standardbreite betragt 13 Stellen. 


Verwandte Befehle: PRINT 
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Kapitel 4 
Das Arbeiten mit 
Disketten und Kassetten 


Teil 1: Disketten 


Das Anfertigen von Arbeitsdisketten 


Dieser Teil beschreibt die Anfertigung von Arbeits-Disketten 
und zeigt einige Moglichkeiten von CP/M und _ seinen 
Dienstprogrammen auf. 


Folgende Themen werden behandelt: 


Kopieren der Systemdisketten 

Start mit CP/M Plus 

Das HELP-Programm 

Betrieb mit einem oder zwei Laufwerken 

Kopieren von Dateien mit PIP 

Disketten mit reinem BASIC-Inhalt 

Schlisselfertige Schneider BASIC-Software 
Installation von schliisselfertiger CP/M Plus-Software 
Start mit GSX 

Betrieb mit CP/M 2.2 


ot >t >t > Ot > OE > > OE 


In Teil 7 des Grundlagenkurses wurde beschrieben, wie eine leere 
System-Diskette formatiert wird, die sowohl fiir BASIC und Spiele als auch fir 
CP/M verwendbar ist. 


In Teil 10 des Grundlagenkurses wurde gezeigt, wie mit dem 
DISCKIT3-Programm (auf Seite 1 Ihres Systemdiskettensatzes) originalgetreue 
Kopien von Disketten gemacht werden konnen. 


Dieser Teil beschreibt die Anfertigung von Disketten fiir Ihre Programme. 
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Reservekopien von Systemdisketten 


Wir empfehlen Ihnen dringend, von den mitgelieferten Systemdisketten bzw. 
Dienstprogramm-Disketten eine Kopie anzufertigen und die Originale an einem 
sicheren Ort zu verwahren. Es ware namlich sehr kostspielig, eine beschadigte 
Diskette zu ersetzen! Jede Diskette hat zwei Seiten; Ihr Systemdiskettensatz 
besteht also aus vier Seiten. Ubrigens ist jede Diskette beidseitig bespielbar. 


Seite 1 ist am wichtigsten. Sie enthalt das Original-CP/M Plus-Programm und 
einige Dienstprogramme zur Handhabung der Disketten. Seite 2 enhalt Dateien 
fir Assembler-Programmierer. Auf Seite 3 finden Sie Dr. LOGO, 
HELP-Programme und GSX (darauf kommen wir spater noch zu sprechen). Seite 
4 beinhaltet die CP/M 2.2- und Dr. LOGO-Programme, die fir die 
Vorgangermodelle CPC664 und CPC464 + DDI1 konzipiert waren. Wir haben 
diese Programme aus Kompatibilitatsgriinden mitgeliefert, fiir den Fall, da8 Sie 
sie brauchen. Fir den CPC6128 werden sie normalerweise nicht bendtigt. 


Die Kopien Ihrer Systemdisketten kénnen Sie als Programm-Bibliothek 
betrachten. Normalerweise werden Sie das benétigte Programm wahlen, indem 
Sie die Bibliotheks-Diskette, auf der es sich befindet, einschieben. Dies ist 
einfacher, als wenn Sie das Programm erst auf eine Leerdiskette ibertragen und 
von dort laufen lassen. 


Um es noch einmal in aller Deutlichkeit zu sagen: Die Bibliotheks-Disketten, mit 
denen Sie arbeiten, miissen KOPIEN der mitgelieferten Systemdisketten sein! 


Wenn Sie auf eine neue, unbespielte Diskette kopieren wollen, denken Sie daran, 
da das DISCKIT3-Programm (auf Seite 1) sowohl zum Formatieren als auch 
zum Kopieren dient. 


Start mit CP/M Plus 


Sie werden sich daran gewohnt haben, daB der Computer auf Schneider BASIC 
eingestellt ist, wenn Sie ihn eingeschaltet haben. Er arbeitet solange mit BASIC, 
bis ein AMSDOS- (bzw. Kassetten-) Binar-Programm die Kontrolle tibernimmt 
oder CP/M Plus mit dem Befehl | cpm geladen wird. 


Sobald CP/M Plus geladen wurde, braucht der CPC6128 die Seite 1 nicht mehr, es 
sei denn, Sie wollen eines der ebenfalls darauf enthaltenen Dienstprogramme 
laufen lassen. Nur die Startdiskette mu8 eine Systemdiskette sein, alle anderen 
Disketten kénnen reine Datendisketten sein, die eine gréfere Speicherkapazitat 
besitzen. 
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Ein Programm 1a8t man ganz einfach ablaufen, indem man die Diskette, auf der 
es sich befindet, ins Laufwerk schiebt, und den Programm-Namen eintippt. Die 
Daten, die das Programm verwendet, kénnen entweder auf derselben, oder auf 
einer anderen Diskette stehen. Unter CP/M Plus kann der Benutzer die Disketten 
genauso auswechseln wie unter AMSDOS. Wenn Sie der Einfachheit halber 
mehrere Programme, eventuell mit ein paar Dienstprogrammen, auf derselben 
Diskette speichern wollen, benutzen Sie das PIP-Programm von Seite 1. Wir 
kommen darauf noch an anderer Stelle in diesem Kapitel und in Kapitel 5 
zurtick. 


Das Profile-Programm 


Auf der Systemdiskette gibt es ein Programm namens PROFILE.SUB. Es 
enthalt eine Liste der Befehle, die automatisch ausgefiihrt werden, nachdem 
CP/M Plus gestartet wird. Sie kénnen dann - sofern Sie es noch nicht getan haben 
- eine Kopie von Seite 1 Ihrer Systemdisketten einschieben. Sobald das 
Bereitschaftszeichen A> erscheint, schreiben Sie: 


REN PROFILE.SUB=PROFILE.ENG 


Dadurch wird das Programm PROFILE.ENG in PROFILE.SUB umbenannt. 
Dieses Programm wird verwendet, wenn CP/M das nachste Mal gestartet wird. Es 
enthalt die Befehle: 


SETKEYS KEYS.CCP 
LANGUAGE 2 


Damit werden die Cursor-Tasten auf CP/M-Funktion umgestellt, und der 
Zeichensatz wird von amerikanisch auf deutsch umgeschaltet, so daf z.B. anstelle 
der eckigen Klammer [ ein A ausgegeben wird. Wenn die Tastatur mit dem 
Befehl SETKEYS KEYS.CCP eingestellt wurde, kénnen die CP/M Befehlszeilen 
auf adhnliche Weise editiert werden wie BASIC-Zeilen. Eine ausfiihrliche 
Beschreibung von SETKEYS finden Sie im 2. Teil des 5. Kapitels. 


Das Help-Programm 


Seite 3 des System-Diskettensatzes bietet spezielle Hilfestellung in Form des 
HELP-Programms. Es ist sozusagen ein elektronisches Bedienungshandbuch fir 
die CP/M Plus-Dienstprogramme. Um diese Funktion einzuschalten, legen Sie 
Seite 3 ins Laufwerk und schreiben, sobald Sie das Bereitschaftszeichen A> 
sehen: 


HELP 
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Das HELP-Programm stellt Ihnen Fragen, die Sie beantworten, so dai Sie 
schlieBlich die gewtinschte Information erhalten. 


Ein Laufwerk oder zwei? 


Wenn CP/M geladen wird, stellt es die Anzahl der angeschlossenen 
Diskettenlaufwerke fest und zeigt sie in der Eréffnungsmeldung an. Beachten Sie, 
dal} die Angabe falsch sein kann, wenn eine Diskette im zweiten Laufwerk nicht 
vollstandig eingeschoben ist. 


Alle Fehlermeldungen, die sich auf den Diskettenmechanismus beziehen, 
erscheinen automatisch in der 25. Zeile des Bildschirms. Die Programme selbst 
nehmen nur die ersten 24 Zeilen ein. 


Wenn Sie nur mit dem eingebauten Diskettenlaufwerk arbeiten, sehen Sie auf 
der untersten Zeile die Meldung ‘Drive is A:’oder ‘Drive ist B:’. Dies 
bedeutet, da CP/M Plus Ihnen gestattet, ein Laufwerk so zu benutzen, als hatten 
Sie zwei angeschlossen. Sie kénnen dann abwechslend mit zwei Disketten 
arbeiten, wobei in der untersten Zeile angesagt wird, welche Diskette das 
Programm jeweils braucht. Mit diesem Operationsmodus kénnen Sie auf ein 
weiteres Diskettenlaufwerk verzichten; allerdings macht er oftmals ein haufiges 
Auswechseln der Disketten erforderlich, was erstens zeitraubend ist und zweitens 
die Gefahr von Irrtiimern erhoht. 


Kopieren von Diskette auf Diskette mit PIP 


Kin Standard-Dienstprogramm namens PIP (Peripheral Interchange Program) 
erméglicht es, Dateien von einer Diskette auf eine andere zu kopieren. 


Dazu laden Sie zunachst das PIP-Programm von Seite 1, indem Sie nach dem A> 
Zeichen 


PIP 


..eintippen. Ein neues Bereitschaftszeichen * zeigt an, da PIP korrekt geladen 
wurde. Normalerweise kopieren Sie Dateien von einer Quellendiskette (in 
Laufwerk A:) auf eine Zieldiskette (in Laufwerk B:) Wie wir schon gesehen 
haben, ist beim Betrieb ohne zusatzliches Laufwerk das eingebaute 
Diskettenlaufwerk zugleich Drive A: und Drive B:. 


Um eine Datei, z.B. SUBMIT.COM, zu kopieren, schreiben Sie nach dem * 
Sternchen: 


B:=A:SUBMIT.COM 
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..und wenn Sie alle Dateien einer Diskette auf eine andere kopieren méchten, 
benutzen Sie den Befehl: 


Bi=*.* 


Um PIP zu verlassen, driicken Sie nach dem Bereitschaftszeichen * die 
[RETURN]-Taste. 


PIP ist ein sehr vielseitiges Programm, wie Sie im 5. Kapitel noch erfahren 
werden. 


Disketten mit reinem BASIC-Inhalt 


Wie wir bereits ausgefiihrt haben, dient eine Systemdiskette normalerweise nur 
dazu, auf CP/M-Betrieb umzuschalten. BASIC-Disketten kénnen daher reine 
Datendisketten sein, die eine etwas gréfere Kapazitat haben. 


Die Diskette mu mit dem DISCKIT3-Programm formatiert werden. Um 
Programme auf diesen Diskettentyp zu kopieren, missen Sie sich entweder des 
PIP-Programms von Seite 1 bedienen, oder mit den BASIC-Befehlen LOAD und 
SAVE arbeiten. 


Schlusselfertige Schneider BASIC-Disketten 


Wenn Sie ein fiir den CPC6128 geschriebenes Anwenderprogramm in Schneider 
BASIC kaufen, ist es in der Regel beim Einschalten betriebsbereit. Es ist 
sozusagen ‘schlisselfertig’. (Der Begriff stammt aus der Zeit, als Kleincomputer 
noch mit abschlieBbaren Netzschaltern ausgeriistet waren.) Ahnlich wie bei den 
beiden zum CPC6128 gehérenden Systemdisketten ist es dringend zu empfehlen, 
da8 Sie nur mit einer Kopie arbeiten und das Original sicher verwahren. 


Schlusselfertige CP/M-Disketten 


Durch das CP/M-Betriebssystem kénnen Sie auf Ihrem Computer eine 
umfangreiche Software-Bibliothek einsetzen, die fiir Personal-Computer mit 
CP/M geschrieben wurde. Diese Programme tragen die Grundvoraussetzungen fir 
ihren Betrieb bereits in sich. Sie mtissen jedoch méglicherweise auf eine 
geeignete Diskette tiberspielt und tiber die besondere Methode informiert werden, 
mit welcher der 6128 den Bildschirm ansteuert. 
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Die Programme einer Diskette, die einem bestimmten Anwendungszweck dienen, 
nennt man ‘Programmpaket’. Diese Pakete sind nomalerweise so konzipiert, da} 
sie auf vielen verschiedenen Computern mit jeweils unterschiedlicher 
Bildschirmgré8e und unterschiedlichen Cursor-Techniken eingesetzt werden 
kénnen. 


Der 6128 besitzt eine eingebaute ‘Bildschirmanpassung’ fiir CP/M-Programme, 
wobei sich die Steuercodes von denen des BASIC unterscheiden. 


Manchmal sind die kauflichen Pakete bereits fiir den CPC6128 installiert, bzw. 
bieten in ihrem Meniti eine passende Installation fiir ihn an. In diesem Fall 
befolgen Sie einfach die Instruktionen fiir einen Zenith Z19/Z29. Hat das Paket 
kein Installationsmenti oder keine spezielle CPC6128-Variante, finden Sie im 
ubernadchsten Abschnitt ‘Konfigurieren eines CP/M-Programms’ einige der 
Befehle, mit denen die fir das Paket erforderlichen Bildschirmbedingungen 
erzeugt werden. Normalerweise missen bei der _ Installation oder 
kundenspezifischen Anpassung die entsprechenden Codes angegeben werden. 
Folgen Sie dabei den Anweisungen auf dem Software-Paket. 


Die erworbene Software mu sich auf einer fiir den CPC6128 geeigneten Diskette 
befinden. Fast jeder Computer-Hersteller verwendet eigene Disketten. Auch 
dasselbe Disketten-Format bedeutet noch nicht, daB die auf ihnen gespeicherten 
Informationen kompatibel sind. Fragen Sie Ihren Handler daher nach 3 
Zoll-Schneider-Disketten. 


Erstellung einer schlisselfertigen 
CP/M-Systemdiskette 


Es ist hdaufig nititzlich, neben dem Anwender-Programm selbst die 
Dienstprogramme SETKEYS.COM und eventuell SUBMIT.COM mit den 
zugehoérigen Instruktionsdateien auf einer schliisselfertigen CP/M-Diskette zu 
haben. 


PIP kann verwendet werden, die .COM-Dateien zu tibertragen und die 
Instruktionsdatei fir SUBMIT herzustellen. In diesem letzteren Modus stellt PIP 
eigentlich nur eine Anderungsfunktion, mit der eine Zeile geandert werden kann. 
Die Datei LOGO3.SUB auf Seite 3 z.B. hatte mit folgendem Verfahren 
hergestellt werden kénnen: 


Sie legen Seite 1 der System-Disketten ins Laufwerk A: und schreiben: 
PIP 


Dann nehmen Sie die System-Diskette heraus und legen die Zieldiskette ein. Nun 
schreiben Sie: 
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LO0GO3.SUB=CON: 
SETKEYS KEYS.DRL 
[CONTROL]}J LOG03 
[CONTORL]Z 


Konfigurieren eines CP/M-Programms 


Der CPC6128 unterstiitzt eine groBe Anzahl von Steuercodes, die der 
kundenspezifischen Anpassung eines Software-Pakets an den CP/M-Betrieb dient. 
Bei den meisten Datenverarbeitungs- und sonstigen Software-Paketen sollen 
Meldungen auf irgendeinen Bildschirmbereich ausgegeben, oder von irgendeinem 
Bildschirmbereich eingegeben werden. Sie arbeiten in der Regel mit 
Cursor-Steuerung. 


Ist Ihr Paket schon an das Schneider-System angepaBt, so brauchen Sie sich nicht 
weiter damit zu befassen. 


Konfigurieren der Ausgabe 


Das Installationsverfahren fiir ein Paket lauft normalerweise uber ein 
bestimmtes Programm, das oft INSTAL genannt wird. Wenn es kein Terminal 
vom Typ Z19/Z29 oder den CPC6128 unterstiitzt, stellt es einige Fragen tiber die 
Parameter des CPC6128-Bildschirms. Die Antworten kénnen an der folgenden 
Tabelle abgelesen werden, die einen Auszug aus dem 15.Teil von Kapitel 7 
darstellt. 


Kontroll- Hex-Wert Dezimal- Funktion 


Codes wert 

[BEL] &07 i Pieps-Ton 

[BS] &08 8 Bewegt den Cursor eine Stelle zuritick 

[LF] &0A 10 Bewegt den Cursor eine Zeile abwarts 

[CR] &0D 13 Bewegt den Cursor zum linken 
Bildschirmrand 

[ESC &1B &41 27 65 Bewegt den Cursor eine Zeile aufwarts 


JA 

IC &1B &43 27 67 Bewegt den Cursor eine Stelle vor 
[ESC]E &1B &45 27 69 Loscht den Bildschirm 

JH &1B &48 27 72 Bringt den Cursor in die linke obere 

Bildschirmecke 

[ESC ]J &1B &4A 27 74 Léscht alles von der momentanen 
Cursorposition bis zum Ende des 
Bildschirms 
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[ESC]K &1B &4B 27 75 Léscht alles von der momentanen 
Cursorposition bis zum rechten 
Bildschirmrand 

[ESCIJL &1B &4C 27 76 Fiigt eine Zeile ein 

[ESC]M &1B &4D 27 77 Léscht die gesamte Zeile 

[ESC]N &1B &4E 27 78 Léscht den Buchstaben, auf dem sich der 
Cursor befindet 

{[ESCIY &1B &59 27 89 Bewegt den Cursor zur angegebenen 

© > 2 Stelle. «c> steht fir Spaltennummer +32, 
a> fir Zeilennummer +32. 

[ESC]d &1B &64 27 100 _Léscht alles vom Bildschirmanfang bis 
zur gegenwartigen Cursorposition 
einschlieflich 

[ESC]lo &1B &6F 27 111 —_ Léscht alles von linken Bildschirmrand 
bis zur Cursorposition einschlieflich 

[ESC ]p &1B &70 27 112 _ Beginn der invertierten Darstellung 

[ESC]q &1B &71 27 113 Ende der invertierten Darstellung 


Konfigurieren der Eingabe 


Die Programme des Software-Pakets kénnen unter Umstanden die Tastatur 
abfragen. Mit Ausnahme der Cursor-Tasten geben die Tasten des 6128 
Standardwerte wieder. Mit dem SETKEYS-Dienstprogramm kénnen die 
Codenummern umdefiniert werden. Allerdings ist es méglichst vorzuziehen, wenn 
alle unterschiedlichen Pakete so konfiguriert werden, da8 sie Standardwerte 
annehmen. 


Bedauerlicherweise gibt es fiir die verschiedenen Software-Programme keine 
einheitlichen Regeln dafiir, durch welche Tasten die einzelnen Steuerfunktionen 
ausgelést werden. Sichtbare Zeichen, sowie die Leertaste, [TAB] und [RETURN], 
sind weitgehend genormt. Aber schon bei der Riickwartstaste hort die 
Einheitlichkeit auf, und von da ab wird es nur schlimmer! Vergleichen Sie nur, 
wieviele verschiedene Codes es fiir die Operation ‘Cursor zum Zeilenanfang 
bewegen’ gibt: 


Bei CP/M heift der Befehl: [CONTROL]B 

Bei Dr.LOGO driicken Sie: [CONTROLJA 

Und bei einer typischen Textverarbeitung driicken Sie wahrscheinlich: 
[CONTROL]QS 


Drei nititzliche Tastencode-Saétze werden standardmaéSig angeboten. Jede 
Konfiguration kann von Dateien auf Seite 1 Ihrer System-Disketten abgerufen 
werden: 


SETKEYS KEYS.CCP 
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Dieser Befehl] wurde schon als einer der Befehle beschrieben, die PROFILE .SUB 
automatisch ausgibt. Er stellt die Tastatur auf CP/M-Befehle ein. 


Start eines schlisselfertigen CP/M-Pakets 


Normalerweise mu8 nach dem Erscheinen des Bereitschaftszeichens A> nur noch 
der Programm-Name des Software-Pakets eingegeben werden. Um beispielsweise 
ein Lohnprogramm mit dem Namen GEHALT.COM zu starten, schreiben Sie 
lediglich: 


GEHALT 


Wenn irgendwelche Konfigurationen festgelegt werden miissen, steht 
méglicherweise eine SUBMIT-Datei zur Verfiigung. Ein Beispiel dafiir bildet die 
Datei LOGO3.SUB auf Seite 3. Sie wird mit dem Befehl: 


SUBMIT LOGO3 

aufgerufen. Der Inhalt der Datei wird gezeigt, wenn Sie 
TYPE LOGO3.SUB 

schreiben, woraufhin Sie sehen: 


SETKEYS KEYS.DRL _ ...stellt die Tastatur ein 
LOGO3 ..startet das Dr. LOGO-Programm 
SETKEYS KEYS.CCP _ ...versetzt die Tastatur in ihren alten Zustand 


Autostart eines schlisselfertigen CP/M-Pakets 


Das Betriebssystem CP/M ist in der Lage, ein bestimmtes Programm mit der 
Start-up-System-Diskette automatisch zu starten. Dazu wird der Name des 
Programms am Ende der PROFILE .SUB-Datei auf dieser Diskette angehangt. 


Start mit GSX 


GSX ist die Abkirzung fir Graphics System Extension (Graphisches 
Erweiterungssystem). Es gestattet einem CP/M-Programm, sowohl Graphik als 
auch Text auszugeben. Damit kénnen z.B. Balken- und Kreisdiagramme 
gezeichnet, sowie Uberschriften in verschiedenen Drucktypen und Gréfen 
dargestellt werden. Die Abbildung auf der nachsten Seite illustriert diese 
Méglichkeit. Mit GSX kann sowohl auf den Bildschirm, als auch auf einen 
Drucker oder einen Zeichenstift-Plotter ausgegeben werden. 
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Mit GSX selber kénnen keine Zeichnungen angefertigt werden, genausowenig wie 
man CP/M zur Textverarbeitung benutzen kann. Dazu braucht man ein spezielles 
Anwenderprogramm. Die abgebildete Zeichnung wurde mit dem Digital 
Research-Programm ‘DR Graph’ erstellt. Mit GSX  kénnen jedoch 
Standard-Systemeinrichtungen fiir Bildschirme, Drucker und Plotter geschaffen 
werden, so daB die Anwenderprogramme mit minimalem Re-Installationsaufwand 
auf den verschiedenen Geraten laufen kénnen. 


Um von einer Diskette GSX-Programme laufen lassen zu kénnen, kopieren Sie 
mit Hilfe von PIP die Dateien GSX.SYS, ASSIGN.SYS, sowie die 
erforderlichen Geraétesteuerprogramme und das Anwenderprogramm selber auf 
eine formatierte Leerdiskette. Die Datei ASSIGN.SYS enthalt ein ‘Rezept’ fir 
bis zu drei Ausgabe-Geratesteuerprogramme. Sie heifen, vom kleinsten 
angefangen: 


21az:ddfxlr7 ;Epson 7 Bit Drucker 
11az:ddhp7478 ;Zeichenstift-Plotter 
@1a:ddmode2 ;Bildschirm in Modus 2 
Bia:ddmodet ;Bildschirm in Modus 1 
O61a:ddmode® ;Bildschirm in Modus 0 


Die erste Zahl gibt an, fiir welches Gerat das Steuerprogramm ist - fir Drucker, 
Plotter oder Bildschirm. In ein und denselben Speicherbereich kann nur ein 
Geradtesteuerprogramm zur gleichen Zeit geladen werden. GSX mu deshalb 
zuerst wissen, welches das grofte ist, um ihm genug Platz reservieren zu kénnen. 


Fir die verschiedenen Bildschirmmodi und fiir Standard-Drucker steht eine 
Auswahl von Steuerprogrammen zur Verfiigung. Die Datei DRIVERS.GSX 
enthalt eine Zusammenstellung der Steuerprogramme, die mit dem 6128 geliefert 
werden. Wenn Sie Seite 3 einlegen und nach Erscheinen des A> tippen: 


TYPE DRIVERS .GSX 


..kénnen Sie die Datei lesen und das passende Steuerprogramm wahlen. Die 
meisten Anwenderprogramme enthalten einen GSX-Lader, so da Sie nach dem 
A> nur noch den Programmnamen einzutippen brauchen. Falls Thr 
Anwender-Programm keinen eingebauten GSX-Lader hat, kopieren Sie die Datei 
GENGRAF . COM (von Seite 3) auf Ihre GSX-Arbeitsdiskette und schreiben: 


GENGRAF YOURFILE 


YOURFILE.COM ist die nicht-installierte Anwendung. Die Datei 
GENGRAF.COM kann jetzt mit ERA geléscht werden, da YOURFILE.COM nun 
den GSX-Lader enthalt. 
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Test—Graphik 


Karls Taschengeld in Pfennigen 


Muster 3 188.66 


Ein Beispiel fiir die Druckausgabe unter GSX 


Der Betrieb mit CP/M 2.2 


Im Gegensatz zu CP/M Plus hat CP/M 2.2 (der Vorlaufer von CP/M Plus) sehr 
strenge Regeln fiir das Auswechseln der Disketten. Es erfordert ein haufiges 
Laden von Teilen des Betriebs-Systems von der Systemdiskette im Laufwerk A:, 
vor allem dann, wenn man nach dem Ablauf eines Programms zum 
Bereitschaftszeichen A» zuriickkehrt. Deshalb arbeitet man normalerweise mit 
System-Disketten. Wenn Sie kein zweites Laufwerk haben, nehmen Sie anstelle 
von PIP das Einzellaufwerks-Kopierprogramm FILECOPY. 


Wir empfehlen, CP/M 2.2 nur dann zu verwenden, wenn Sie bereits Software fur 
die Schneider-Modelle CPC664 oder CPC464 + DDI1 haben, die mit CP/M Plus 
nicht kompatibel ist. 


ACHTUNG! Ein Teil der CP/M 2.2-Software fiir den CPC664 und den 
CPC464 + DDI1 enthalt spezifische Installations-Instruktionen und kann 


mit CP/M Plus nicht betrieben werden. In diesen Fallen mu8 mit CP/M 2.2 
auf Seite 4 des System-Diskettensatzes gearbeitet werden. 
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Teil 2: Kassetten 


Wenn Sie, wie im _ 1.Teil des Grundlagenkurses' beschrieben, ein 
Kassettenlaufwerk an das System angeschlossen haben, schalten Sie den 
Computer mit dem Befehl | TAPE auf Kassettenbetrieb. Einige BASIC-Befehle 
werden dann an den Kassettenbetrieb angepafit. Auf dem Bildschirm erscheinen 
verschiedene Software-Meldungen und Bereitschaftszeichen, die Sie beim 
normalen Diskettenbetrieb nicht sehen. 


HINWEIS: Wenn die Tasten zum Vor- bzw. Rickspulen durch Fernsteuerung 
bedient werden, missen Sie beim Spulen entweder den Stecker aus der 
REM-Buchse ziehen oder !TAPE:CAT eintippen, um den Motor des 
Kassettengerates in Gang zu bringen. Mit [ESC] wird diese Funktion riickgangig 
gemacht. 


Anders als bei der Diskettenspeicherung unterliegt die Form der Dateinamen fur 
die Kassettenspeicherung nicht solch strengen Regeln. Sie kénnen bis zu 16 
Zeichen lang sein und diirfen Zwischenraume und Satzzeichen aufweisen. In 
manchen Fallen kénnen sie auch vollig weggelassen werden. 


Im folgenden ist aufgefiihrt, welche Befehle sich auf den Kassettenbetrieb 
einstellen, und welche Funktion sie dabei erfiillen. Die Beschreibung der Befehle 
finden Sie im Kapitel 3 ‘Liste aller Befehle des Schneider CPC6128 BASIC’. 


CAT 


Sie werden angewiesen: 
Press PLAY and then any key: 


..woraufhin Sie die Taste PLAY auf Ihrem Kassettenlaufwerk und danach eine 
beliebige Taste auf dem Computer driicken. Das Band in der Kassette lauft an 
und der Computer fihrt die Namen aller auf der Kassette befindlichen Dateien 
auf, in der Reihenfolge, wie er sie vorfindet. 


Jeder Block einer Datei wird angezeigt, gefolgt von einem Zeichen, das den 
Datei-Typ angibt: 


$ fiir: ungeschiitzte BASIC-Datei 
% fir: geschiitzte BASIC-Datei 

* fur: ASCII-Datei 
& fiir: Binar-Datei 
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Am Ende der Zeile erscheint: 
Ok 


..um anzudeuten, da8 der Lesevorgang erfolgreich war, und da} die Datei in den 
Computer geladen werden kénnte. 


Das gegenwartig im Speicher befindliche Programm wird durch die 
CAT-Funktion nicht beeintrachtigt. 


Eine namenlose Datei erscheint bei CAT unter der Bezeichnung: 
Unnamed file 


Durch Driicken der [ESC]-Taste wird die CAT-Funktion verlassen. 


Lesefehler 


Falls die oben erwahnten Meldungen beim Lesen der Datei nicht ausgegeben 
werden, oder die Mitteilung: 


Read error a 
...oder: 
Read error b 
auf dem Bildschirm erscheint, gibt es folgende Griinde dafiir: 


1. Das Kassettenlaufwerk wurde nicht richtig an die TAPE-Buchse 
angeschlossen (siehe Teil 2 des Grundlagenkurses). 


2. Der VOLUME- oder LEVEL-Regler am Kassettengerat ist nicht richtig 
eingestellt. 


3. Schlechte Bandqualitat, bzw. beschadigtes Band 


4. Das Band wurde einem Magnetfeld ausgesetzt, d.h. zu dicht neben einem 
Lautsprecher, Fernseher 0.4. gelagert. 


Sie haben eine Kassette verwendet, die sich nicht fiir den Betrieb auf 
Schneider Computer-Systemen eignet. 


or 


Das Arbeiten mit Disketten und Kassetten Kapitel 4 Seite 13 


CHAIN 

CHAIN MERGE 
LOAD 

MERGE 

RUN 


Wenn Sie die erste geeignete Datei auf der Kassette laden méchten, brauchen Sie 
ihren Namen nicht anzugeben. Beispiele: 


CHAIN "" 
CHAIN "",188 


CHAIN MERGE "" 
CHAIN MERGE "",188 
CHAIN MERGE "",180,DELETE 38-78 


LOAD eee 2 
LOAD "",&1F4B 


MERGE ''" 


RUN '"'" (Hinweis: Statt diesen Befehl einzutippen, kénnen Sie auch die 
{CONTROL]-und [ENTER]-Tasten driicken, wenn Sie 
Kassetten-Software starten wollen und zuvor ITAPE 
angegeben haben.) 


Folgende Aufforderung erscheint: 
Press PLAY then any key: 


..woraufhin Sie die PLAY-Taste an Ihrem Kassettengerat und danach eine 
beliebige Taste auf dem Computer driicken. Das Band in der Kassette fangt an zu 
laufen und der Computer ladt die Datei in seinen Speicher. 


Auf dem Bildschirm erscheint die Meldung: 
Loading DATEINAME block 1 


Danach folgen Anzeigen mit den tibrigen Blocknummern, bis die Datei geladen 
ist. 
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Beginnt der Dateiname mit einem Ausrufungszeichen !, so werden die oben 
genannten Meldungen unterdriickt, und Sie brauchen nicht eine beliebige Taste 
zu driicken, um den Ladevorgang einzuleiten. (Die PLAY-Taste mu jedoch 
gedriickt sein.) Méchten Sie Programme, die mit einem Ausrufungszeichen 
beginnen, auf Diskette laufen lassen, so wird das Ausrufungszeichen beim Laden 
von Diskette (d.h. beim Lesen des Dateinamens) ignoriert. Beachten Sie, da8 das 
Ausrufungszeichen keine Stelle im Dateinamen einnimmt, weder bei der 
Kassetten- noch bei der Diskettenspeicherung. 


Brechen Sie den Ladevorgang durch Driicken der [ESC]-Taste ab, erscheint 
folgende Fehlermeldung: 


Broken in 
Wenn das Laden nicht klappt, lesen Sie den vorigen Abschnitt ‘Lesefehler’. 


ACHTUNG! Das éingebaute Diskettenlaufwerk nimmt einen kleinen Teil des 
Speichers ein, der in manchen Fallen fiir Software benétigt wird, die fiir den 
CPC464 geschrieben wurde. Diese Kassetten funktionieren auf dem CPC6128 mit 
angeschlossenem Kassettenlaufwerk nicht einwandfrei. 


EOF 
POS(#9) 


Die Funktion dieser Befehle bleibt beim Kassettenbetrieb erhalten. 


INPUT #9 
LINE INPUT #9 
OPENIN und CLOSEIN 


Wenn Sie die erste geeignete Datei auf der Kassette laden méchten, brauchen Sie 
den Namen nicht anzugeben. Beispiel: 


OPENIN ""' 
Sie werden aufgefordert: 

Press PLAY then any key: 
..woraufhin Sie die PLAY-Taste auf dem Kassettengerat und danach eine 
beliebige Taste driicken. Das Band in der Kassette fangt an zu laufen, und der 


Computer ladt die ersten 2K-Byte der Datei in den Teil seines Speichers, der als 
‘Dateipuffer’ bezeichnet wird. 
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Die Eingabe erfolgt vom Dateipuffer, bis er leer ist. Dann erscheint auf dem 
Bildschirm wieder: 


Press PLAY then any key: 


Nun werden die nachsten 2K-Byte in den Dateipuffer geladen. 


Dabei wird wieder die Lademeldung: 
Loading DATEINAME block 1 


..ausgegeben, gefolgt von Anzeigen mit den tbrigen Blocknummern, bis die Datei 
geladen ist. 


Steht am Anfang des Dateinamens beim OPENIN-Befehl ein Ausrufungszeichen 
, werden die oben genannten Meldungen unterdrtickt und Sie brauchen nicht eine 
beliebige Taste zu dricken, um den Ladevorgang einzuleiten. (Die 
PLAY-Taste auf dem Kassettengerat mu8 allerdings gedriickt sein.) Méchten Sie 
Programme, die mit einem Ausrufungszeichen beginnen, auf Diskette laufen lass- 
en, so wird das Ausrufungszeichen beim Laden der Diskette (d.h. beim Lesen des 
Dateinamens) ignoriert. Beachten Sie, da3 das Ausrufungszeichen keine Stelle im 
Dateinamen einnimmt, weder bei der Kassetten- noch bei der Diskettenspeiche- 
rung. 


Brechen Sie den Ladevorgang durch Driicken der [ESC]-Taste ab, so erscheint 
folgende Fehlermeldung: 


Broken in 


Hat das Laden nicht geklappt, sagt Ihnen der Abschnitt ‘Lesefehler’ vielleicht, 
warum. 


LIST #9 

OPENOUT und CLOSEOUT 
PRINT #9 

WRITE #9 


Méchten Sie die Datei als Unnamed file (namenlose Datei) speichern, 
brauchen Sie keinen Namen anzugeben. Beispiel: 


OPENOUT "" 
Die ersten 2K-Byte der Datei, die auf Kassette gespeichert werden soll, werden 


zunachst in einem Teil des Speichers mit dem Namen ‘Dateipuffer’ gespeichert. 
Ist der Puffer voll, werden Sie angewiesen: 
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Press REC and PLAY then any key: 


..woraufhin Sie die RECORD- und PLAY-Tasten auf Ihrem Kassettenlaufwerk 
driicken und danach eine beliebige Taste auf dem Computer. Das Band in der 
Kassette beginnt zu laufen und der Computer speichert den Inhalt des Puffers auf 
Kassette. Danach fallt er den Puffer mit den nachsten 2K-Byte auf und verlangt 
wieder: 


Press REC and PLAY then any key: 


Dann speichert er die 2K-Byte aus dem Puffer wieder auf Kassette. 
Ist der Puffer nur teilweise voll, wenn der Befehl CLOSEOUT gegeben wird, wird 
dieser Rest auf Kassette gespeichert. Danach kommt die Aufforderung: 
Press REC and PLAY then any key: 
Nachdem Sie dies getan haben, erscheint die Meldung: 
Saving DATEINAME block «x 


Beginnt der Dateiname im OPENOUT-Befehl mit einem Ausrufungszeichen ! , so 
wird die oben genannte Meldung unterdriickt und Sie brauchen keine beliebige 
Taste zu driicken, um den Speichervorgang einzuleiten. (Die RECORD- und 
PLAY-Tasten des Kassettenlaufwerks missen jedoch gedriickt sein.) Méchten Sie 
ein Programm, das mit einem Ausrufungszeichen beginnt, auf Diskette laufen 
lassen, so wird das Ausrufungszeichen beim Speichern (d.h. beim Lesen des 
Dateinamens) ignoriert. Beachten Sie, da8 das Ausrufungszeichen keine Stelle im 
Dateinamen einnimmt, weder bei der Kassetten- noch bei der 
Diskettenspeicherung. 


Wird der Speichervorgang durch Driicken der [ESC]-Taste unterbrochen, so 
erscheint folgende Fehlermeldung: 


Broken in 


Damit das Speichern gelingt... 


Beachten Sie folgende Hinweise, damit die Daten sicher gespeichert werden: 


1.  Prifen Sie, ob Ihr Kassettenlaufwerk tber die TAPE-Buchse richtig mit dem 
Computer verbunden ist (siehe Teil 2 des Grundlagenkurses). 


2. Die RECORD- bzw. LEVEL-Regler am Kassettengerat mtssen richtig 
eingestellt sein. 
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3. Verwenden Sie keine Kassetten minderwertiger Qualitat oder 
C120-Kassetten. 


4. Achten Sie darauf, die Kassetten keinen magnetischen Feldern auszusetzen, 
d.h. legen Sie sie nicht in die Nahe von Lautsprechern, Fernsehgeraten u.a. 


5. Bevor Sie ein Programm aus dem Speicher loschen, tiberpriifen Sie mit CAT, 
ob es wirklich gespeichert wurde. 


6. Sorgen Sie dafiir, da8 das Kassettenlaufwerk regelmaRig gewartet wird und 
daB die Tonkopfe regelmaBig gereinigt werden. 


SAVE 


Wenn die Datei als namenlose Datei (Unnamed file) gespeichert werden soll, 
brauchen Sie ihr keinen Namen zu geben. Beispiel: 


S A Vv E asue 
Auf dem Bildschirm sehen Sie die Anweisung: 


Press REC and PLAY then any key: 


..woraufhin Sie die RECORD- und PLAY-Tasten des Kassettenlaufwerks und 
danach eine beliebige Taste auf dem Computer driicken. Das Band in der Kas- 
sette beginnt zu laufen, und der Computer speichert das Programm ab. 


Dabei erscheint auf dem Bildschirm die Meldung: 
Saving DATEINAME block 1 


Danach folgen Anzeigen mit den tibrigen Block-Nummern, bis die Datei 
gespeichert ist. 


Beginnt der Dateiname mit einem Ausrufungszeichen ! , so werden die oben 
genannten Meldungen unterdrtickt, und Sie brauchen keine beliebige Taste auf 
dem Computer zu driicken, um den Speichervorgang einzuleiten. (Die Tasten 
RECORD und PLAY auf dem Kassettengerat miissen jedoch gedrtickt sein.) 
Mochten Sie ein Programm, das mit einem Ausrufungszeichen beginnt, auf 
Diskette laufen lassen, so wird das Ausrufungszeichen beim Speichern (d.h. beim 
Lesen des Dateinamens) ignoriert. Beachten Sie, da8 das Ausrufungszeichen 
keine Stelle im Dateinamen einnimmt, weder bei der Kassetten- noch bei der 
Diskettenspeicherung. 
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Wird der Speichervorgang durch Driicken der [ESC]-Taste abgebrochen, so 
erscheint die Fehlermeldung: 


Broken in 


Lesen Sie den vorigen Abschnitt: ‘Damit das Speichern gelingt...’ 


SPEED WRITE 

Dieser Befehl wird nur beim Kassettenbetrieb ausgefiihrt. Er kann jedoch auch 
eingegeben werden, wenn der Computer auf Diskettenbetrieb geschaltet ist. 
Fehlermeldungen 


Wahrend des Kassettenbetriebs kénnen die Fehlermeldungen 7, 21, 24, 25, 27 
und 32 auftreten (siehe Teil 6 des 7.Kapitels: ‘Ubersicht’). 


Externe AMSDOS-Befehle 


Ob die Ein- bzw. Ausgabebefehle fiir Kassette oder Diskette gelten sollen, wird 
durch folgende Steuerbefehle bestimmt: 


| TAPE (kann in | TAPE.IN und ITAPE.OUT unterteilt werden) 
IDISC (kann in IDISC.1INund IDISC.OUT unterteilt werden) 


Die nachfolgend aufgefithrten Steuerbefehle sprechen nur die Diskette an, 
unabhangig davon, ob Kassettenbetrieb gewahit wurde oder nicht: 
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Kapitel 5 
AMSDOS und CP/M 


Teil 1: AMSDOS 


Folgende Themen werden behandelt: 


Einfihrung in AMSDOS 

Disketten-Inhaltsverzeichnis 

Disketten-Wechsel 

Dateinamen und -typen 

AMSDOS Datei-Vorspann 

Dateinamen beim Betrieb mit zwei Diskettenlaufwerken 
Wild Cards (Universalzeichen) 

Beispiel-Programm mit AMSDOS-Befehlen 

Liste der AMSDOS-Befehie 


Kopieren von Dateien 


+ % % % + H OF H HF 


Liste der Fehlermeldungen 


Einleitung 


AMSDOS erweitert das mit Ihrem Computer gelieferte BASIC durch eine Anzahl 
externer Befehle, die jeweils durch das vorangestellte Balkensymbol | 
gekennzeichnet werden. 


AMSDOS ermdglicht es dem Benutzer, die Disketten nach Belieben zu wechseln, 
solange keine Dateien in Bearbeitung sind - sonst wird eine Fehlermeldung 
ausgegeben, und es kann zu Datenverlusten kommen, falls in die offene Datei 
geschrieben wurde. 
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Disketten-Inhaltsverzeichnis 


Jede Diskette ist in zwei Bereiche unterteilt, einen fur das Inhaltsverzeichnis und 
einen fiir die Daten. Das Inhaltsverzeichnis enthalt eine Liste aller Dateinamen 
und einen ‘Belegungsplan’, der angibt, an welcher Stelle auf der Diskette sich die 
einzelnen Dateien befinden. AMSDOS und CP/M konnen die Gré8e einer Datei 
nach Einsicht der Eintrage im Inhaltsverzeichnis berechnen. Die Berechnung des 
freien Speicherplatzes auf der Diskette geschieht durch Addition aller Dateien des 
Inhaltsverzeichnisses und Ermittlung des noch verbleibenden Speicherbereiches. 


Beim Lesen einer Datei wird aus dem Eintrag im Inhaltsverzeichnis der 
Speicherort entnommen. Beim Anlegen einer neuen Datei wird der freie 
Speicherplatz reduziert, beim Liéschen einer Datei entsteht freier Speicherplatz. 
Das Inhaltsverzeichnis arbeitet mit 1KByte-Einheiten und kann bis zu 64 
verschiedene Eintrage verwalten. Gro&e Dateien werden im Inhaltsverzeichnis in 
16KByte-Blocke unterteilt, was dem Anwender jedoch verborgen bleibt. 


Diskettenwechsel 


Beim Betreib mit AMSDOS (und CP/M PLUS) kénnen Disketten beliebig 
gewechselt oder aus dem Laufwerk genommen werden, solange auf das Laufwerk 
nicht zugegriffen wird, und solange weder Eingabe- noch Ausgabe-Dateien auf 
diesem Laufwerk gedffnet sind. Anders als mit CP/M 2.2 ist ein ‘Log-In’ der 
Disketten (Warmstart) nicht erforderlich. 


Das Herausnehmen einer Diskette, wahrend auf sie geschrieben wird, kann ihre 
Daten beschadigen. Wird eine Diskette herausgenommen, auf der sich noch offene 
Dateien befinden, verla8t AMSDOS alle offenen Dateien, sobald es diesen 
Zustand erkannt hat, und gibt eine Fehlermeldung aus. Alle Daten, die noch auf 
Diskette geschrieben werden sollten, werden nicht gespeichert, und der letzte 
Eintrag in das Inhaltsverzeichnis der Diskette wird nicht vorgenommen. 
AMSDOS kann das Herausnehmen der Diskette aber nur dann erkennen, wenn 
es das Inhaltsverzeichnis liest, also nach jedem 16KByte-Block, oder wenn eine 
Datei erdffnet oder geschlossen wird. Es kénnen also maximal 16KByte Daten 
verloren gehen, wenn eine Diskette mit nicht geschlossenen Dateien 
herausgenommen wird. 


AMSDOS- Dateinamen und -Dateitypen 


Es ist ublich, Dateinamen so zu wahlen, da der Dateityp daraus hervorgeht. 
Diese Namenskonvention zwingt den Computer nicht, die Datei auf eine 
bestimmte Art und Weise zu behandeln. Einige Programme akzeptieren eine 
Datei jeoch nur, wenn der richtige Namenstyp angegeben ist. AMSDOS 
akzeptiert jeden Namenstyp, sucht aber bevorzugt bestimmte Dateitypen (siehe 
‘AMSDOS-Vorspann’). 
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Erstellen von Dateinamen 


Der Dateiname besteht aus zwei Teilen, die durch einen Punkt (.) voneinander 
getrennt sind. Der erste Teil kann bis zu acht, der zweite bis zu drei Zeichen lang 
sein. So sind beispielsweise "ROINTIME.DEM", "DISCKIT3.COM" und 
"DISC.BAS" zulassige Dateinamen. 


Der zweite Teil des Dateinamens ist der sogenannte Dateityp. Dateiname und 
Dateityp kénnen aus Buchstaben und Ziffern zusammengesetzt sein. Sie durfen 
jedoch keine Leerzeichen oder Satzzeichen enthalten. Einige gebrauchliche 
Dateitypen sind: 


. Leerstellen. Nicht spezifizierter Typ. Kann eine mit dem _ Befehl 
OPENOUT "NAME" angelegte Datei sein, oder ein durch 
AMSDOS' (mittels SAVE "PROGRAMM",A)  gespeichertes 
BASIC-Programm. 


.BAS BASIC-Programm, durch AMSDOS mittels SAVE "NAME" oder 
SAVE "NAME",P oder SAVE "NAME.BAS",A gespeichert. 


.BIN Programm oder Speicherbereich, durch AMSDOS  mittels 
SAVE "NAME" ,B,-binadre Parameter: gespeichert. 


. BAK Alte Version einer Datei. AMSDOS oder ein Dienstprogramm 
haben eine neue Version unter demselben Namen gespeichert. Bei 
Bedarf kann auf die alte Version zurtckgegriffen werden. 


.COM Befehlsdatei. Alle CP/M-Dienstprogramme sind von diesem 
Dateityp. 
. SUB Instruktionsdatei fiir das CP/M SUBMIT-Programm. 


AMSDOS-Vorspann 


AMSDOS speichert Dateien automatisch mit einem passenden Typ-Identifikator. 
Normalerweise brauchen Sie also den Dateityp nicht anzugeben, es sei denn, Sie 
mochten andere als die oben genannten Standard-Dateitypen angeben. 
BASIC-Programmdateien, geschitzte BASIC-Programmdateien, sowie 
Binardateien werden mit einem Vorspann auf Diskette gespeichert, so da8 der 
AMSDOS-Befehl 


LOAD "Name" 
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sie wiedererkennen und entsprechend bearbeiten kann. Findet AMSDOS nach 
dem Befeh! LOAD keinen Vorspann, geht es davon aus, daf es sich um eine 
ASCII-Datei, also eine reine Textdatei, handelt. 


Ungeachtet dessen, was im Vorspann steht, sucht AMSDOS, wenn es eine Datei 
ohne Typspezifikation laden soll, zunachst unter den Dateien vom Typ: 


. Leerstellen> 
Ist die Datei dort nicht zu finden, sucht es unter: 
-BAS 


..und schlieBlich unter: 


»BIN 


Auf diese Weise kann sich der Benutzer die Angabe des Dateityps im Namen in 
den meisten Fallen ersparen. 


Eine durch den Befehl OPENOUT erdffnete und danach_beschriebene 
Disketten-Datei hat keinen Vorspann. Sie ist eine ASCII-Datei (Textdatei) und 
enthalt nur die Daten aus den WRITE-, PRINT- und LIST-Anweisungen. Der 
Disketten-Befehl OPENIN sucht nach Dateien ohne Typenspezifikation in 
derselben Reihenfolge wie LOAD. 


Dateinamen beim Betrieb mit zwei 
Diskettenlaufwerken 


Beim Betrieb mit einem doppelten Diskettenlaufwerk, dh. wenn Sie Ihr 
Computer-System mit einem zusatzlichen Diskettenlaufwerk ausgertstet haben, 
kénnen sich in beiden Laufwerken Dateien befinden. Da der Computer nicht 
automatisch in beiden Laufwerken nach einer Datei sucht, mu& der Benutzer das 
Laufwerk angeben. Sie kénnen zur Bestimmung des Laufwerks entweder die 
Befehle 1A, 1B oder | DRIVE benutzen (genaue Beschreibung folgt) und dann 
den Dateinamen nennen, oder dem Dateinamen A: oder B: voranstellen, und 
somit die vorherige Laufwerkszuweisung vortibergehend auBer Kraft setzen. Ein 
Programm wird also sowohl durch: 


1B 
SAVE "PROG.BAS" 
1A 


als auch durch: 
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[A 
SAVE "B:PROG.BAS" 


auf die Diskette in Laufwerk B gespeichert. 


Auf gleiche Weise wird die vorher zugewiesene USER- (=Benutzer) Nummer 
- USER- Nummern dienen zur Unterteilung des Inhaltsverzeichnisses -ignoriert, 
wenn dem Dateinamen eine USER-Nummer (zwischen 0 und 15) vorangestellt 
wird. Durch die Befehle: 


LOAD "15:PROG.BAS" 
und 
SAVE "15:PROG.BAS" 


wurde das Programm im Diskettenteil der USER-Nummer 15 laden und 
speichern, ganz gleich, welche USER-Nummer vorher angegeben war (siehe 
| USER-Befehl unter ‘Liste der AMSDOS-Steuerbefehle’). 


SchlieBlich ist es auch méglich, beide Einstellungen fiir USER und DRIVE 
ungiiltig zu machen, indem man sie in dieser Reihenfolge dem Dateinamen 
voranstellt, z.B.: 


RUN '15B:PROG.BAS" 


Universalzeichen (Wild Cards) 


Haufig ist es erforderlich, einige Disketten-Operationen (kopieren, léschen usw.) 
mit mehreren Dateien durchzufihren. Wenn ein Dateiname fir eine bestimmte 
Operation vorgesehen ist, sucht AMSDOS im Inhaltsverzeichnis nach genau 
diesem Namen. Dort wo der Befehl es zula&t, kann die Operation auch auf 
mehrere Dateien bezogen werden, indem man einen Teil der Zeichen im 
Dateinamen durch Universalzeichen ersetzt. Jedes Fragezeichen ersetzt als 
Universalzeichen ein Stelle im Dateinamen. Wenn mehrere aufeinanderfolgende 
Zeichen im Namen durch ein Universalzeichen ersetzt werden sollen, kann man 
die Reihe von Fragezeichen durch das Sternchen * abktrzen. Der Dateiname 
FRED.* ist also eine Abkirzung fir FRED.???, und F*.BAS kann fir 
F?22?222727.BAS stehen. 


Der Ausdruck * . * bedeutet demzufolge ‘alle Dateien’. 
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Beispiele: 


Inhaltsverzeichnis| Kurzform Kurzform Kurzform 
*. BAS FRED?.BAS Fx. BA? 
entspricht entspricht entspricht 


BERT.BAS BERT.BAS 

FRED1.BAS FRED1.BAS FRED1.BAS FRED1.BAS 
FRED2.BAS FRED2.BAS FRED2.BAS FRED2.BAS 
FRED3.BAK FRED3.BAK 
FRED3.BAS FRED3.BAS FRED3.BAS FRED3.BAS 
FERTIG.BAS FERTIG.BAS FERTIG.BAS 


Beispiel zu AMSDOS-Befehlen in Programmen 


Wir empfehlen Ihnen zum besseren Verstandnis der AMSDOS-Befehle, die 
folgenden Beispiele durchzuarbeiten und sich dazu die entsprechenden Abschnitte 
dieses Kapitels anzusehen. Benutzen Sie dazu auf keinen Fall eine originale 
CP/M-Systemdiskette, verwenden Sie stattdessen eine Arbeitskopie. 


Speichern von Variablen und Herstellung eines 
Bildschirmabdrucks 


Im ersten Beispiel wird auf die Diskette geschrieben. Deshalb miissen Sie eine 
formatierte Leerdiskette oder Arbeitsdiskette ins Laufwerk einlegen, um das 
Programm ablaufen zu lassen. Mit dem Programm wird die britische 
Nationalflagge (Union Jack) gezeichnet und als Bild auf Diskette gespeichert. 


18 dumpdatei$="f lagdump.srn" 

20 MODE 1:BORDER @ 

3@ DIM colour(2) 

40 FOR i=@ TO 2 

5@ READ Farbe(i): REM Farben kommen von DATA- Anweisung 
68 INK i,Farbe(i) 


78 NEXT 
86 ON ERROR GOTO 438 
96 OPENIN "param.dat" ‘ testen ob Datei existiert 


1@@ CLOSEIN:ON ERROR GOTO @ 
110 IF errnum=32 AND DERR=146 THEN CLS: 
GOTO 166 ' Datei existiert nicht 
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120 CURSOR 1:PRINT “Soll alte Datei ueberschrieben 
werden? J/N "; 

138 aS=INKEY$S:0N INSTR(" JN", ,UPPERS$( aS) ) 
GOTO 138,158,148:GOTO 138 

140 PRINT aS:PRINT "Programm verlassen":END 

15@ PRINT a$:CURSOR @ 

168 OPENOUT "param.dat" 

178 WRITE #9,dumpdatei$,1: REM speichert Dateinamen und 
Modus 

188 FOR i=@ TO 2 

198 WRITE #9,Farbe(i): REM speichert Farben 

200 NEXT i 

218 CLOSEOUT 

2208 CLS 

238 gp=1:GRAPHICS PEN gp:w=125 

246 x=-65:a=246: y=400:b=-158:GOSUB 400 

2580 y=8:b=158:GOSUB 400 

260 x=575:a=-246: y=400:b=-158:GOSUB 400 

270 y=0:b=158:GOSUB 486 

2808 gp=2:GRAPHICS PEN gp:w=4@ 

298 a=2406:x=-48: y=400:b=-158:GOSUB 480 

300 x=O8:y=@8:b=158:GOSUB 408 

318 a=-240:x=648:y=0:b=158:GOSUB 408 

320 x=600:y=400:b=-158:GOSUB 400 

330 ORIGIN 0,0,256,3886,0,400:CLG 

340 ORIGIN @,0,0,640,158,250:CLG 

358 ORIGIN 8,0,280,352,0,400:CLG 

360 ORIGIN 0,80,0,640,168,238:CLG 

370 SAVE dumpdatei$,b,&CO88,&4008 

380 DATA 2,26,6 

39@ END 

480 MOVE x,y:DRAWR a,b:DRAWR w,@:DRAWR -a,-b 

418 MOVE xta/2tw/2,y+b/2:FILL gp 

420 RETURN 

438 errnum=ERR: RESUME NEXT 

run 


MmMnM Re — 


Die Dateitypen .DAT und .SRN deuten auf den Inhalt der Dateien hin. 
PARAM.DAT ist eine ASCII-Datei ohne Vorspann, FLAGDUMP.SRN ist eine 
AMSDOS-Binar-DATEI mit Vorspann. 


Sie sehen, wie das Programm absichtlich versucht, von der Datei PARAM. DAT 
zu lesen, bevor es auf sie schreibt, um festzustellen, ob die Datei schon existiert. 
Gibt es diese Datei nicht, wird von BASIC eine Fehlermeldung ausgegeben. Der 
Fehler wird vom Programm abgefangen und das Programm wird ohne 
Unterbrechung ausgefiihrt. Existiert die Datei schon, erscheint keine 
Fehlermeldung, sondern das Programm fragt automatisch, ob diese Datei 
tiberschrieben werden soll. 
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Die Informationen zum _ Bildschirmabdruck, wie  Bildschirm-Modus, 
Paletten-Farbe und Name der Datei, die die eigentliche Information enthalt, 
werden in einer Parameter-Datei gespeichert. Dieses Beispiel illustriert, wie 
Programm-Variablen (dumpdatei$) und Konstanten (1) auf eine Daten-Datei 
gespeichert werden (mittels WRITE), damit sie von anderen Programmen benutzt 
werden kénnen. 


Laden des Bildschirmabdrucks 


Das zweite Beispiel ist ein allgemeines Programm zu Darstellung eines 
Bildschirmabzugs unter Steuerung einer Parameter-Datei. Beachten Sie, wie 
Variablen mittels INPUT von der Daten-Datei geholt und mit der EO F-Funktion 
die Gro8e der Datei automatisch variiert wird. Der durch dieses Programm 
dargestellte Bildschirmabdruck mu8 auf einer bekannten Position im Speicher 
liegen, sonst wird die Darstellung verschoben. Dies wird sichergestellt, indem das 
Speicher-Programm einen MODE-Befehl ausfiihrt und der Bildschirm danach 
nicht ‘gescrollt’ wird. 


10 DIM Farbe(15): REM bietet 16 Farben an 
20 OPENIN "param.dat" 

3@ INPUT #49, Dateiname$,Bildschirmmodus 
409 i=8 

5@ WHILE NOT EOF 

60 INPUT #9,Farbe(i) 

70 INK i,Farbe(i) 

88 i=i+1 

968 WEND 

108 CLOSEIN 

118 MODE Bildschirmmodus:BORDER @ 

126 LOAD Dateinames 

run 


Liste der externen AMSDOS-Befehle 


lA 
lA 
KOMMANDO: Bestimmt Laufwerk A als Standard-Laufwerk. Entspricht dem 


Befeh] |DRIVE mit Parameter A. (Das eingebaute Laufwerk im Computer ist 
Laufwerk A.) 
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IB 
iB 
KOMMANDO: Bestimmt Laufwerk B als Standard-Laufwerk. Entspricht dem 


Befehl [DRIVE mit Parameter B. (Das eingebaute Laufwerk im Computer ist 
Laufwerk A.) 


| CPM 
1 CPM 
KOMMANDO: Schaltet um auf eine andere Disketten-Umgebung, indem es das 


Betriebssystem von einer System-Diskette ladt. Die mit dem Computer 
gelieferten Betriebssysteme sind CP/M Plus und CP/M 2.2. 


Das Kommando bleibt wirkungslos, wenn sich keine System-Diskette mit CP/M 
im Laufwerk befindet. 


| DIR 


| DIR [,-Textausdruck | 


IDIR,"*.BAS" 
KOMMANDO: Zeigt das Inhaltsverzeichnis der Diskette (im CP/M-Stil) sowie den 
freien Speicherplatz an. Wenn der :Textausdruck> fehlt, wird *. * angenommen. 
| DISC 
IDISC 
KOMMANDO: Entspricht den beiden Kommandes IDISC.IN und 
IDISC.OUT. 
| DISC.IN 
IDISC.IN 


KOMMANDO: Verwendet die Diskette als Datei-Eingabe-Medium. 
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| DISC.OUT 
IDISC.OUT 


KOMMANDO: Verwendet die Diskette als Datei-Ausgabe-Medium. 


| DRIVE 
IDRIVE,-Textausdruck> 
IDRIVE,"A" 


KOMMANDO: Legt das Standard-Laufwerk fest. Dieser Befeh] funktioniert nur, 
wenn AMSDOS die Diskette im angegebenen Laufwerk lesen kann. 


| ERA 
}ERA,-Textausdruck: 
IERA,"*.BAK" 


KOMMANDO: Alle Dateien des angegebenen Namens, die nicht nur gelesen 
werden, werden geldscht. Es konnen auch Universalzeichen eingesetzt werden. 


| REN 


{REN ,-Textausdruck: ,:Textausdruck- 
IREN,"NEUNAME.BAS","ALTNAME.BAS" 


KOMMANDO: Gibt einer Datei einen neuen Namen. Eine Datei mit dem neuen 
Namen darf noch nicht existieren. Unversalzeichen sind nicht erlaubt. 


Fur einen .Textausdruck: kann auch der USER-Parameter (siehe Befehl | USER) 
angegeben werden, um die Standard-USER-Nummer auszuschalten. Wenn der 
Befehl z.B. lautet: 


IREN,"@:NEU.BAS","15:ALT.BAS" 
wird die Datei "ALT.BAS' unter USER 15 nach ihrer Umbenennung in 


"NEU.BAS" unter USER @ eingeordnet, gleichgtltig, welche USER-Nummer 
vorher bestimmt worden war. 
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| TAPE 

I TAPE 

KOMMANDO: Entspricht den beiden Befehlen | TAPE. IN und I TAPE.OUT. 
Wird nur benotigt, wenn ein Kassettenlaufwerk angeschlossen ist. 

| TAPE.IN 

ITAPE.IN 

KOMMANDO:  Verwendet die Kassette als Datei-Eingabe-Medium, 
vorausgesetzt, da} ein Kassettengerat angeschlossen ist. 

| TAPE.OUT 

ITAPE.OUT 

KOMMANDO:  Verwendet die Kassette als Datei-Ausgabe-Medium, 


vorausgesetzt, daB ein Kassettengerat angeschlossen ist. 


| USER 


1USER,-ganzzahliger Ausdruck: 
IUSER,3 


KOMMANDO: Legt fest, fiir welchen der bis zu 16 verschiedenen Abschnitte des 
Inhaltsverzeichnisses (von 0 bis 15) die Disketten-Befehle (z.B. CAT, LOAD, 
| DIR, usw.) gelten sollen. 


Eine Datei der einen USER-Nummer kann mit dem | REN-Kommando auf eine 
andere Ubertragen werden. So tibertragt z.B.: 


TREN,"15:BEISPIEL.BAS","@:BEISPIEL.BAS" 


die Datei BEISPIEL.BAS von USER @ auf USER 15, ohne daf ihr Name 
geandert wird. 
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Kopieren von Dateien 


AMSDOS-Dateien mit Vorspann 


Dateien dieses Typs kénnen in der CP/M-Umgebung mittles PIP (siehe Teil 2 in 
diesem Kapitel) kopiert werden. Jede unter AMSDOS erstellte Datei mit 
Vorspann (s.o. unter ‘AMSDOS-Vorspann’) kann vollstandig von Diskette auf 
Diskette kopiert werden. Im allgemeinen kann jedoch der Inhalt der Datei durch 
CP/M-Programme nicht bearbeitet werden. 


ASCII-Dateien 


Unter AMSDOS erstellte Dateien ohne Vorspann sind in der Regel 
ASCII-Dateien. Sie kénnen sowohl kopiert, als auch von CP/M-Programmen 
verstanden werden. Inbesondere sollte es méglich sein, ASCII-Programm-Dateien, 
ASCII-Daten-Dateien und ASCII-Text-Dateien frei zwischen AMSDOS-und 
CP/M-Programmen auszutauschen. 


Nur lesbare Dateien 


Mit CP/M kann eine Datei als ‘nur lesbar’ deklariert und/oder im 
Inhaltsverzeichnis in einen besonderen Systemzustand versetzt werden. Derartige 
Attribute kénnen nur in einer CP/M-Umgebung bestimmt werden; sie werden 
jedoch auch von AMSDOS respektiert. Weitere Einzelheiten dazu finden Sie im 
2.Teil dieses Kapitels unter SET. 


Kopieren zwischen Diskette und Kassette 


CP/M Plus unterstitzt keine Kassettendateien. Es ist deshalb nicht mdglich, 
Kassettendateien auf Diskette zu kopieren oder umgekehrt Diskettendateien auf 
Band zu ubertragen. Fiir diese Zwecke missen Sie die Dienstprogramme CLOAD 
und CSAVE von CP/M 2.2 (auf Seite 4 der Systemdisketten) benutzen. 


Verfahren zum Kopieren von Dateien 


Die folgenden Tabellen zeigen die Kopierverfahren von Kassette (falls 
angeschlossen) auf Diskette und umgekehrt fir Dateien jeden Typs. Es wird 
davon ausgegangen, dafi} kein weiteres Diskettenlaufwerk angeschlossen ist. 
Geschiitzte BASIC-Programme kénnen tiberhaupt nicht von oder auf Kassette 
kopiert werden, Binar-Dateien (z.B. in Maschinensprache geschriebene 
Videospiele) sind nur kopierfahig, wenn die Speicheradresse bekannt ist. Weitere 
Einzelheiten tiber die PIP-, CLOAD- und CSAVE-Programme finden Sie im 
zweiten Teil dieses Kapitels. 
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Kopiertabellen 


Kopierziel: auf Kassette * 


Schneider BASIC ITAPE 

auf Kassette * LOAD "FILE 
«Kassettenwechsel- 
SAVE "FILE" 
IDISC 

Binar 

auf Kassette * 

ASCII ITAPE 

auf Kassette * LOAD "FILE" 
<Kassettenwechsel- 


SAVE "FILE",A 
IDISC 


Schneider BASIC ITAPE 
auf Diskette * LOAD "FILE" 
IDISC 
SAVE "FILE" 
ASCII ITAPE 
auf Diskette LOAD "FILE" 
IDISC 
SAVE “FILE",A 
Binar 


auf Diskette * 


* Datei mit Vorspann 


Kopierquelle 


Schneider BASIC ASCII -Daten 
auf Kassette * 


Binar 
auf Kassette * 


H=HIMEM 

ITAPE 

MEMORY «3-1 
LOAD "FILE" 
‘Kassettenwechsel- 
SAVE "FILE" ,B, 
ar, db [,s] 
IDISC 

MEMORY H 
‘Anmerkung 2> 


Diskette mit CP/M 2.2 einlegen- 


I CPM 

CLOAD "FILE" ,TEMP 
«Kassettenwechsel> 
CSAVE TEMP ,"FILE"” 
ERA TEMP 

AMSDOS 

-Anmerkung 1> 


‘Diskette mit CP’M 2.2 einlegen> 


IL CPM 
CLOAD "FILE" 
AMSDOS 


H=HIMEM 

[TAPE 

MEMORY s-1 
LOAD "FILE" 
IDISC 
SAVE"FILE" ,B, 
ap DL, s] 
MEMORY H 
‘Anmerkung 2> 


‘Anmerkung 1: Erfordert freien Disketten- Speicherplatz fiir die temporare Datei "TEMP". 
‘Anmerkung 2) «a ist die Anfangsadresse der Datei, <1» die Lange und <s> optional die Startadresse. 


AMSDOS und CP/M 
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Kopierziel 


Schneider BASIC 
auf Kassette * 


Binar 
auf Kassette * 


ASCII 
auf Kassette * 


Schneider BASIC 
auf Diskette * 


ASCII 
auf Diskette 


AMSDOS Binar 
auf Diskette * 


Alle anderen 
auf Diskette 


* Datei mit Vorspann 


Schneider BASIC ASCII -Daten AMSDOS Binar 
auf Diskette * 


LOAD "FILE" 
ITAPE 
SAVE "FILE" 
IDISC 


LOAD "FILE" 
ITAPE 

SAVE "FILE",A 
IDISC 

-oder- 

Diskette mit CPM 2.2 
einlegen- 

ICPM 

CSAVE FILE 
AMSDOS 


LOAD "FILE" 
«Diskettenwechsel- 
SAVE "FILE" 

- oder - 

‘Diskette mit CP/M 
Plus einlegen> 
ICPM 

PIP B:=FILE 
AMSDOS 


LOAD "FILE" 
‘Diskettenwechsel- 
SAVE "FILE",A 


auf Diskette 


Kopierquelle 


Alle anderen 


-Daten auf Diskette auf Diskette 


H=HIMEM 
MEMORY -s.-1 
LOAD "FILE" 
I TAPE 
SAVE "FILE", B, 
ay b{,-s:] 
IDISC 
MEMORY H 
‘Anmerkung 2: 
‘Diskette mit CP/M 
2.2 einlegen- ‘Diskette mit CP/M 
1 CPM 2.2 einlegen> 
CSAVE FILE | CPM 
AMSDOS CSAVE FILE 
AMSDOS 
‘Anmerkung 3> 
Diskette mit CP/M 
Plus einlegen- 
ICPM 
PIP B:=FILE 
AMPs ‘Diskette mit CP/M 
Plus einlegen: 
1CPM 
PIP B:=FILE 
AMSDOS Diskette mit CP/M 
Plus einlegen> 
CPM 
PIP B:=FILE 
AMSDOS 


‘Anmerkung 2: «a: ist die Anfangsadresse der Datei, :], die Lange und -s- optional die Startadresse 
‘Anmerkung 3+ Zieldatei kann nicht direkt von BASIC benutzt werden. Diese Option ist als kostengiinstiges 
Transport - und Backup - Medium niitzlich. Die Datei kann mit CLOAD "FILE" zurick auf Diskette kopiert 


werden. 
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Liste der AMSDOS-Fehlermeldungen 


Wenn AMSDOS irgendeinen Befehl nicht ausfiihren kann, wird eine 
Fehlermeldung ausgegeben. Gibt es Probleme mit der Hardware, folgt auf die 
Fehlermeldung die Frage: 

Retry, Ignore or Cancel? 


R (Retry) verursacht eine Wiederholung der Operation, moglicherweise nachdem 
der Anwender entsprechende Mafinahmen getroffen hat. 


I (Ignore) bewirkt eine Fortsetzung der Bearbeitung, als ware kein Problem 
aufgetreten. Dies fiihrt haufig zu unerwarteten oder gar unerwinschten 
Ergebnissen. 


C (Cancel) macht die Operation rickgangig, was haufig zu einer neuen 
Fehlermeldung fihrt. 


Die Fehlermeldungen und ihre Bedeutung 
Unknown command 

Der Befehl ist nicht richtig geschrieben 
Bad command 


Der Befehl kann aus bestimmten Griinden nicht ausgefiihrt werden (Syntax- oder 
Hardware-Fehler). 


‘Datei already exists 


Der Benutzer versucht, eine Datei mit einem schon existierenden Namen zu 
versehen. 


‘Datei. not found 
Datei existiert nicht. 
Drive -Laufwerk': directory full 
Kein Platz mehr fiir neue Eintrage in das Disketten-Inhaltsverzeichnis. 


Drive Laufwerk’: disc full 
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Keine Platz mehr fiir neue Daten auf der Diskette 
Drive -Laufwerk}: disc changed, closing -Datei> 
Diskette wurde gewechselt, ohne alle darauf gespeicherten Dateien zu schliefen. 
Datei is read only 
Datei kann nicht bearbeitet werden, da sie nur lesbar ist. Dateien kénnen nur in 
einer CP/M-Umgebung in den Zustand ‘nur lesbar’ oder ‘schreib- und lesbar’ 
versetzt werden. 
Drive .Laufwerk): disc missing 
Diskette wurde nicht oder nicht korrekt eingelegt, bzw. dreht sich nicht. Driicken 
Sie den Auswurfknopf und legen Sie die Diskette noch einmal ein. AnschlieBend 
R eingeben. 
Drive Laufwerk): disc is write protected 
Es wurde versucht, auf eine Diskette mit offenem Schreibschutzloch zu schreiben. 
Sie nehmen die Diskette heraus, schlieSen das Schreibschutzloch, schieben die 
Diskette wieder hinein und driicken R. 


Drive <Laufwerk>: read fail 


Hardware-Fehler beim Lesen der Diskette. Nehmen Sie die Diskette heraus und 
legen Sie sie wieder ein. Danach R drticken. 


Drive -Laufwerk>: write fail 


Hardware-Fehler beim Beschreiben der Diskette. Nehmen Sie die Diskette heraus 
und legen Sie sie wieder ein. Danach R driicken. 


Failed to load CP/M 


Lesefehler beim Laden von CP/M mit dem | CPM-Befehl oder Verwendung einer 
untauglichen System-Diskette ohne CP/M. Beachten Sie, da der Versuch, CP/M 
von einer Daten-Diskette zu laden, mit der Fehlermeldung ‘read fail’ 
quittiert wird. 
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Teil 2: CP/M 


CP/M Plus 


In diesem Teil werden folgende Themen behandelt: 


Einfihrung in CP/M 
‘Booten’ von CP/M Plus 
Direkter Konsolmodus 
Transiente Programme 
Peripherie-Verwaltung 
Einsatz von CP/M 2.2 


> > 3 2 OE 


CP/M Plus ist ein Disketten-Betriebssystem. Es ist ein spezielles Programm, 
welches Ihnen die volle Nutzung des CPC6128 erschlieBt. Die 128K RAM kénnen 
voll ausgenutzt werden, wobei fir Anwender-Programme 61K zur Verfiigung 
stehen. CP/M bietet direkten Zugriff auf Daten-Dateien, und der CPC6128 
verfiigt tiber einen komplizierten Bildschirm-Anpassungsmechanismus. 


Da CP/M fiir sehr viele unterschiedliche Computer angeboten wird, kénnen Sie 
unter tausenden von Anwender-Programmpaketen wahlen, um Ihr Wissen und 
Ihren Erfahrungshorizont in vielfaltiger Weise zu erweitern. 


Nahere Einzelheiten zu CP/M Plus, einschlieBlich Anleitungen zum Entwickeln 
eigener Programme, sind in SW 971 ‘CP/M Plus Handbuch’ enthalten. 


Einleitung 


Das CP/M-Betriebssystem ermdéglicht es dem Benutzer, mit dem Computer zu 
kommunizieren, sowie Dateien und Peripheriegeréte zu manipulieren. 
Sonderbefehle (und sogenannte Dienstprogramme auf der Diskette) helfen Ihnen 
bei Ihrer Hauptaufgabe, die Anwender-Programme mit Ihren Daten laufen zu 
lassen. 
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Natirlich kénnen Sie lernen, mit CP/M und all den _ verschiedenen 
Dienstprogrammen wie ein Experte umzugehen, und dieses Wissen kann Ihnen 
sehr zugute kommen, wenn Sie einmal in Schwierigkeiten geraten sollten. Fur 
die meisten von Ihnen aber geniigt es zu wissen, wie man den Computer in Gang 
bringt. In diesem Teil des Kapitels sollen alle Merkmale und Moglichkeiten 
vorgestellt werden, ohne den Blick auf das Wesentliche mit zu vielen 
Detailinformationen zu verstellen. 


Wahrend BASIC einen Direktmodus hat, der durch die Bereitschaftsmeldung 
‘ready’ gekennzeichnet ist, gibt es bei CP/M den ‘Direkten Konsol-Modus’, der sich 
mit A> oder B> meldet. Es stehen bestimmte eingebaute Befehle zur Verfigung, 
aber der Grofteil der ‘Hausarbeit’ wird durch das Laden und Starten sogenannter 
transienter Programme verrichtet. Sie werden als transient (=vortibergehend) 
bezeichnet, weil sie sich nur im Computer befinden (von Diskette geladen), 
wahrend Sie sie benutzen, im Gegensatz zu eingebauten Programmen. 


Neben CP/M-Standard-Fehlermeldungen gibt das System auch eine Reihe 
spezieller Hardware-Fehlermeldungen aus. Man erkennt sie normalerweise 
daran, daf sie auf der letzten Bildschirmzeile erscheinen. 


CP/M Plus auf Diskette 


Der gréBte Teil von CP/M Plus befindet sich in einer Datei mit dem Dateityp 
- EMS auf Seite 1 des System-Diskettensatzes. Der Computer ladt CP/M in zwei 
Phasen von dieser Datei in seinen Speicher. 


Zuerst ladt der AMSDOS-Befeh! | CPM den ersten Sektor von Spur 0. Auf einer 
System-Diskette ist dieser Sektor als Programm ausgelegt, das dann die 
.EMS-Datei in den Speicher ladt. Die restlichen System-Spuren bleiben 
unbenutzt. 


Profile-Programm fur den Kaltstart 


Falls sich die Datei PROFILE.SUB auf der Diskette befindet, wahrend CP/M 
Plus geladen wird, werden die Anweisungen dieser Datei dem Computer 
ubergeben. Auf diese Weise kann auf eine andere Tastatur umgeschaltet, der 
Bildschirm angepaBt, der Drucker in Gang gesetzt oder ein 
Anwender-Programm sofort gestartet werden. In Kapitel 4 haben wir gezeigt, wie 
eine PROF I LE-Datei von Seite 1 umbenannt und somit aktiviert werden kann. 


Wahrend die PROF ILE-Datei bearbeitet wird, wird auf der Diskette eine kleine 
Ubergangs-Datei eréffnet, die deshalb beschreibbar gemacht werden muJ. Dies ist 
der Grund, weshalb die System-Diskette selber keine erkennbare 
PROF ILE-Datei enthalten kann. 
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PROFILE-Dateien kénnen mit einer Textverarbeitung, einem Text-Editor (z.B. 
ED.COM) oder auch mit BASIC erstellt werden. Man kénnte beispielsweise mit 
folgendem kleinen BASIC-Programm die PROFILE. SUB-Datei einrichten: 


1@ OPENOUT "PROFILE.SUB" 

20 PRINT #49, "SETKEYS KEYS.CCP" 
3 PRINT #9,"LANGUAGE 2" 

48 CLOSEOUT 


Steuer-Codes von der Konsole 


In der CP/M-Umgebung werden besondere Tasten-Funktionen benutzt. Diese 
Tastenfunktionen ersetzen die Funktion der [ESC]- und Cursor-Tasten des 
Schneider-BASIC. Die nachfolgend aufgefihrten Steuer-Codes treten nach dem 
Befehl: 


SETKEYS KEYS.CCP 


in Kraft, wobei sowohl das transiente Programm SETKEYS.COM als auch die 
Befehls-Datei KEYS. CCP auf Seite 1 der Systemdisketten steht. 


Steuer-Code Taste Funktion 
[CONTROL]JA a Bewegt den Cursor um eine Stelle 
nach links. 
[CONTROL]B [CONTROL]( Bewegt den Cursor zum Anfang der 
oder Zeile. Steht er schon am Anfang, 
[CONTROL]) wird er ans Zeilenende gesetzt. 
[CONTROL]C [CONTROL][ESC] Unterbricht. 


[CONTROL]JE [CONTROL][RETURN] Zeilenvorschub 


[CONTROL]F 9) Bewegt den Cursor um eine Stelle 
nach rechts. 

[CONTROL]G {CLR] Léscht das Zeichen, auf dem sich 
der Cursor befindet. 

[CONTROL]H {DEL] Loscht das Zeichen links vom 
Cursor. 
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[CONTROL] [TAB] 
[CONTROL]J [RETURN] 

oder 

[ENTER] 
[CONTROL]K [CONTROL][CLR] 
[CONTROL]M (RETURN] 

oder 

[ENTER] 
[CONTROL]P 
[CONTROL]Q 
[CONTROLJR [CONTROL][ENTER] 
[CONTROL]S [ESC] 
[CONTROL]U 
[CONTROL]W [COPY] 
[CONTROL]X [CONTROL][DEL] 
{CONTROL]Z 
Dateinamen 


Riickt den Cursor zum nachsten 
Tabulator vor. 


Gibt die Befehlszeile in den 
Computer ein. 


Léscht alles bis zum Ende der 
Zeile. 


Gibt die Befehlszeile in den 
Computer ein. 


Schaltet auf Druckerausgabe um, 
d.h. schaltet die Bildschirmausgabe 
auf den Drucker. 


Nimmt die Bildschirmausgabe 
wieder auf. 


Kopiert die Befehlszeile. 

Stoppt die Bildschirmausgabe von 
CP/M. Wiederaufnahme mit 
[CONTROLJQ. 


Setzt die gesamte Zeile zuriick. 


Ruft die zuletzt eingegebene 
Befehlszeile wieder auf. 


Léscht alles vom Anfang der Zeile 
bis zum Cursor. 


Bezeichnet das Ende des Textes. 


Viele Befehle tbernehmen Dateinamen als Parameter. Dabei kénnen auch 
Universalzeichen darin enthalten sein (vergl. Abschnitt ‘Universalzeichen’ im 
ersten Teil dieses Kapitels). Alle Dateinamen werden in Grofbuchstaben 


umgewandelt. 
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Bei direkten Konsol-Befehlen und in den meisten Dienstprogrammen braucht der 
Dateiname nicht in Anftthrungszeichen zu stehen. Denken Sie daran, dai’ dem 
Dateinamen A: oder B: vorangestellt werden kann, damit CP/M das gewiinschte 
Laufwerk verwendet. 


Hin typischer CP/M-Befehl sieht also so aus: 
TYPE KEYS.CCP 


TYPE ist dabei die gewtinschte Funktion und heift soviel wie: 


‘Stelle auf dem Bildschirm dar’, wahrend mit KEYS.CCP spezifiziert wird, 
welche Datei gezeigt werden soll. 


Umschaltung des Standardlaufwerks 


Wenn Sie ein zweites Diskettenlaufwerk angeschlossen haben, kénnen Sie 
entweder Laufwerk A oder B zum Standardlaufwerk erklaren, indem Sie nach 
Erscheinen des Bereitschaftszeichens A> oder B> die Zeichen B: bzw. A: 
eingeben. Das Bereitschaftszeichen A> oder B> gibt das momentane 
Standardlaufwerk an. Die Angabe A: oder B: vor einem Dateinamen bestimmt 
lediglich, fiir welches Laufwerk die nachste Operation gilt; sie Andert nicht die 
Standardeinstellung. 


Direkte Konsol-Befehle 


Es gibt eine Reihe von direkten Konsol-Befehlen (residente Befehle), die nach 
dem Erscheinen des Bereitschaftszeichens A> bzw. B> eingegeben werden 
konnen. Alle diese Befehle kénnen abgekiirzt werden. Wahrend die unten 
beschriebenen einfachen Funktionen eingebaut sind, gibt es kompliziertere 
transiente Befehle mit demselben Namen. 


DIR 


DIR listet das Inhaltsverzeichnis einer Diskette auf. Die Dateinamen sind in 
keiner bestimmten Reihenfolge angeordnet. Die Position des Dateinamens bei der 
DIR-Darstellung ist jedoch ein Hinweis darauf, an welcher Stelle des 
Inhaltsverzeichnisses die Datei eingetragen ist. Universalzeichen sind erlaubt. 
Mit SYS versehene Dateinamen werden nicht aufgelistet. 
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DIR Listet alle Dateien des Standardlaufwerks auf. 

DIR B: Listet alle Dateien von Laufwerk B auf. 

DIR *.BAS Listet alle Dateien vom Typ . BAS auf. 

DIR B:*.BAS Listet alle Dateien vom Typ .BAS von Laufwerk B auf. 
DIR PIP.COM Listet nur die Datei PIP. COM auf, sofern vorhanden. 


DIRSYS oder DIRS 


Mit DIRSYS oder DIRS werden nur mit ‘SYS’ versehene Eintrage des 
Inhaltsverzeichnisses aufgelistet. Im tbrigen funktioniert der Befehl wie DIR. 
Das Attribut SYS wird spater beschrieben. 


ERASE oder ERA 


Mit ERA werden Dateien im Inhaltsverzeichnis gestrichen. Sie werden jedoch nur 
aus dem Inhaltsverzeichnis geléscht, die Daten selbst verbleiben im Datenbereich 
der Diskette, bis der Platz von einer anderen Datei eingenommen wird. Die 
Information ist aber trotzdem nicht mehr abrufbar. Dateinamen mit 
Universalzeichen sind zugelassen. Sollen solche Dateinamen gelischt werden, 
wird eine Bestatigung dafiir verlangt. ERA listet die geléschten Dateinamen 
nicht auf. Soll eine Datei geléscht werden, die als ‘nur lesbar’ erkannt wird, bricht 
die Befehlsausfihrung ab. Das Attribut fiir ‘nur lesbar’ wird spater beschrieben. 


ERA PIP.COM léscht die Datei PIP.COM. 
ERA B:PIP.COM_ léscht die Datei PIP.COM von Laufwerk B. 
ERA *.BAS léscht alle . BAS-Dateien. 


RENAME oder REN 


REN dient zur Umbenennung einer bestehenden Datei. Zuerst wird der neue 
Dateiname angegeben, es folgt ein Gleichheitszeichen = und dahinter der alte 
Name. Existiert bereits eine Datei mit dem neuen Dateinamen, wird eine 
Fehlermeldung ausgegeben. 


Dateinamen mit Universalzeichen kénnen mit dem eingebauten REN-Befehl 
nicht verwendet werden. Hier mu stattdessen mit dem transienten Programm 
RENAME. COM gearbeitet werden. 


REN NEUNAME.BAS=ALTNAME.BAS andert den Namen der Datei ALTNAME. 
BAS in NEUNAME.BAS um. 


REN B:NEUNAME.BAS=ALTNAME.BAS aAndert den Namen’ der Datei 


ALTNAME.BAS auf Laufwerk B in 
NEUNAME.BAS um. 
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TYPE oder TYP 


TYPE stellt die angegebene Datei auf dem Bildschirm dar. Handelt es sich dabei 
nicht um eine ASCII-Datei, kénnen unvorhergesehene oder unerwiinschte Neben- 
wirkungen auftreten. 


TYPE KEYS.CCP 


zeigt die Datei KEYS . CCP auf dem Bildschirm. 


USER oder USE 


USER andert die gegenwartige Benutzer- (User-)Nummer. Beim Einschalten von 
CP/M Plus ist die Benutzer-Nummer automatisch 0. Normalerweise kann nur auf 
Dateien unter der gegenwartigen Benutzer-Nummer zugegriffen werden. Auf 
diese Weise wird das Inhaltsverzeichnis in unterschiedliche Bereiche eingeteilt. 


Auf eine Datei mit dem Attribut SYS, die sich unter der Benutzer-Nummer 0 
befindet, kann von allen anderen Benutzer-Nummern zugegriffen werden. Diese 
Méglichkeit macht Dienst- und Anwender-Programme allen Benutzern 
zugadnglich, ohne dafi jeder Benutzer-Bereich eine Kopie dieser Programme 
enthalten muf. 


USER 3 


schaltet auf den Benutzerbereich 3. 


Transiente Befehle 


Um komplexere Datei-Bearbeitungen durchzufihren, als sie mit den direkten 
Konsol-Befehlen méglich sind, kénnen Sie sich der verschiedenen 
Dienstprogramme bedienen. Diese werden einfach aufgerufen, indem Sie den 
Programm-Namen und eventuell den Dateinamen und/oder einige Parameter 
angeben. Eines der Dienstprogramme ist DISCKIT3, mit dem Sie 
wahrscheinlich schon gearbeitet haben. 


Die Befehle fallen unter verschiedene Kategorien, wie unten angegeben. Die 
komplette Dokumentation dieser Programme ist sehr umfangreich. Weitere 
Kinzelheiten erfahren Sie in den HELP-Dateien (auf Seite 3 der 
Systemdisketten), sowie im CP/M Plus Handbuch SW 971. 
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Die Befehle DISCKIT3, SETKEYS, SETLST , SETSIO, PALETTE, 
LANGUAGE und AMSDOS, sowie die GSX Bildschirm-Steuerbefehle und die 
Installation von L0G03 sind ausschlieflich fir Schneider CPC-Computersysteme 
konzipiert. Sie funktionieren nicht mit anderen CP/M-Systemen. 


Ks konnen mehrere Befehle in einer Zeile untergebracht werden. Sie sind jeweils 
durch ein Ausrufungszeichen zu trennen. Beispiel: 


LANGUAGE 2!SETKEYS KEYS.WP 


Peripherie-Verwaltung 


DISCKIT3 ist ein kombiniertes Formatier-, Kopier- und Prif-Programm. Es 
geht schneller, wenn die Diskette beim Kopieren formatiert wird, als wenn sie 
erst formatiert wird, und dann die Daten auf sie kopiert werden. Umfassende 
Mentis bieten mehrere Méglichkeiten an, die durch Drucken einer Taste 
(meistens einer Funktionstaste) gewahlt werden. Vendor-Format-Disketten sind 
spezielle System-Disketten fiir den Software-Vertrieb, obwohl — sich 
Data-Format-Disketten vermutlich besser fiir den  Betrieb in der 
CP/M-Plus-Umgebung eignen wiirden. 


VORSICHT! Die Lizenz ftir Ihre CP/M-Diskette (die mit einer 
elektromagnetischen Serien-Nummer versehen ist) erlaubt ihren Einsatz 
nur auf einem einzigen Computer-System. Das heift, die Weitergabe der 
CP/M-Disketten Ihrer Serien-Nummer (oder einer Kopie davon) an andere 
Personen ist verboten. Da die Seite 1 Ihrer System-Disketten CP/M (in der 
. EMS-Datei) enthalt, diirfen Sie Disketten, die diese Datei enthalten, weder 
verkaufen noch tauschen noch irgendwie anders in Umlauf bringen. 


Zeichen anderer Sprachen 


Der CPC6128 enthalt einen vollstandigen Satz internationaler Zeichen. Mit dem 
LANGUAGE-Befehl kénnen bestimmte Zeichen auf der Tastatur ausgetauscht 
werden, so da’ man mit einfacher Software Zeichen anderer Sprachen auf dem 
Bildschirm darstellen kann. Weitere Informationen dazu finden Sie im 16. Teil 
des Kapitels ‘Ubersicht’. 


Mit dem Befehl: 
LANGUAGE 2 


wird der CPC6128 von amerikanischer auf deutsche Tastatur umgestellt. 
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Farben 


Die Standardfarben fiir CP/M Plus auf dem 6128 (mit Farbmonitor) sind 
leuchtendweiBe Schrift auf blauem Grund. Mit dem Befehl PALETTE koénnen 
diese Farben geandert werden. Die zugehérigen Parameter geben die INK-Farbe 
an. Der erste Parameter bestimmt die Farbe fiir Rand und Schriftuntergrund, der 
zweite Parameter die Schriftfarbe. Jede Farbe ist mit einer Nummer zwischen 0 
und 63 versehen. Beim Griin-Monitor andert sich die Farbintensitat (Helligkeit). 


Im Prinzip kann jede der 16 Farben gewahlt werden; allerdings sind im 
80-Spalten-Modus nur die ersten zwei Farben méglich. 


Durch den Befehl: 
PALETTE 63,1 


wird die normale Farbkombination umgekehrt: blaue (1) Schrift erscheint auf 
leuchtendweifem (63) Untergrund. 


Aus der folgenden Tabelle kénnen Sie die gewitnschten Farben (oder 
Helligkeitsgrade) auswahlen. Im Befehl konnen Sie wahlweise die hexadezimale 
oder dezimale Schreibweise verwenden. 


Farbe dezimal Farbe dezimal 


schwarz pastellblau 43 
blau orange 44 
leuchtend blau rosa 46 
rot pastellmagenta 47 
magenta leuchtend grin 48 
mauve seegrtin 50 
leuchtend rot leuchtend blaugriin 51 
purpur limonengriin 56 
leuchtend magenta pastellgriin 58 
grin pastell blaugriin 59 
blaugriin leuchtend gelb 60 
himmelblau pastellgelb 62 
gelb leuchtend wei 63 
weil 
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Tastatur 


Die von der Tastatur erzeugten Codes kénnen mit dem Befehl SETKEYS 
gedndert werden. So kann man Tasten und Erweiterungszeichen mit geeigneten 
Codes versehen. Die Codes selber mtissen in die Datei geschrieben werden, dessen 
Name dann im SETKEYS-Befeh] angegeben wird. Die Befehlsdatei kann mit 
einem Text-Editor, mit PIP oder mit BASIC erstellt werden. Nehmen wir als 
Beispiel: 


SETKEYS KEYS.TST 
KEYS.TST enthalt: 


E&8C "DIR 1M" Erweiterungszeichen 12 
8NSC" TH" Rickwarts-Taste=[CONTROL]H,ASCII 08 


Der Befehl SETKEYS KEYS.TST_ definiert erstens das [CONTROL] 
{(ENTER]-Erweiterungszeichen (dargestellt durch &8C) in den String DIR 


[RETURN] um, und andert zweitens die Cursor-links-Taste (Tasten-Nummer 8) in 
eine Riickwarts-Taste um. 


Mitgelieferte Standard-Dateien fiir den 6128 sind KEYS.CCP zur Korrektur von 
CP/M-Befehlen, KEYS.DRL fur den Einsatz von Dr.LOGO (auf Seite 3) und 
KEYS.WP, die meist beim Einsatz von Textverarbeitung geeignet ist. 


Drucker 
Drucker kénnen mit folgendem Befehl initialisiert werden: 

SETLST «Dateiname> 
wobei Dateiname> den String oder die Strings einhalt, die zum Drucker gesendet 
werden sollen. Wie bei der Befehlsdatei fir SETKEYS kénnen Steuer-Codes 
durch: 

* Zeichen> 
oder: 


* “Zeichenwert:’ 


oder: 
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+ ' Steuer-Code-Name: ' 


dargestellt werden, wobei Steuer-Code-Namen ESC, FF usw. sind (siehe Tabelle 
der ASCII-Zeichen im Kapitel ‘Ubersicht’). 


Fur viele Drucker ist 15 ein nitzlicher Initialisierungs-Code. Er stellt den 
Drucker auf ein enges Schriftbild ein. 


In BASIC wiirde der Befeh] so aussehen: 
PRINT #8,CHR$(15) 
In CP/M geben Sie folgenden Befehl aus: 
SETLST CONDENSE 
Die Datei CONDENSE enthalt einen der folgenden Ausdriicke in einer Textzeile: 
t ' SI ’ 
fp '0 
, i] & F ' 
t ' 1 5 ' 


die alle als Dezimalwert 15 interpretiert werden. 


Einige Anwender-Programme setzen einen Bildschirm von 24x80 Zeichen voraus. 
Mit dem Befehl SET 24X8Q wird die Bildschirmgrd8e darauf eingestellt. 


Die Befehle: 
SET24X8@ 
oder: 
SET24X8@ ON 
setzen den Bildschirm-Modus auf 24x80 Zeichen, und: 
SET24X8@0 OFF 
schaltet den 24x80-Modus ab. 
Die normale Bildschirmgréfe des 6128 ist 24x80, wobei die unterste Zeile fur 
Status-Meldungen reserviert bleibt. Ist der 24x80-Modus abgeschaltet, zeigt sich 
dies nur daran, da die Status-Zeile auBer Kraft gesetzt ist. Im 15. Teil von 


Kapitel 7 finden Sie Naheres dartiber, wie die Status-Zeile an- und abgeschaltet 
wird. 
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Serielles Interface 


In CP/M Plus ist eine Unterstiitzung fiir ein einkanaliges serielles 
Eingabe/Ausgabe-Interface (RS232) eingebaut. Mit dem Befehl: 


SETSIO 


(ohne Parameter) kénnen seine wichtigsten Statistiken untersucht werden. Sie 
konnen auch durch einen Befehl eingestellt werden, der aus einigen (oder allen) 
der folgenden Angaben bestehen kann: 


SETSIO, RX 1200, TX 75, PARITY NONE, STOP 1, BITS 8, 
HANDSHAKE ON, XOFF OFF 


Auf diese Weise wird eine neue Konfiguration hergestellt. 


Baud-Raten und XON/X0OF F-Status kénnen auch durch Zuordnungen beeinfluft 
werden, die mit dem Befehl DEVICE vorgenommen werden. DEVICE verknupft 
logische und physikalische Elemente. Logische Elemente werden durch einen 
Doppelpunkt angezeigt. Um alle gegenwartigen Element-Attribute zu 
untersuchen, schreiben Sie: 


DEVICE 
Die Attribute konne durch folgende Befehle verandert werden: 


DEVICE SI0£L12@01] ~~ setzt SIO auf 1200 Baud 
DEVICE SIOLXONJ schaltet SIO XON/XOFF Protokoll an. 
DEVICE SIOLCNOXON] schaltet SIO XON/XOFF Protokoll ab. 


Die Verkntipfungen zwischen logischen und physikalischen Gerdten konnen 
verandert werden. Normalerweise ist CON: mit CRT (Tastatur/Bildschirm), 
AUX: mit $10 (der optionalen seriellen Schnittstelle) und LST: mit LPT (der 
Centronics Drucker-Schnittstelle) verbunden. Mit dem Befehl: 


DEVICE LST:=SI10 


..wird die Drucker-Ausgabe zur seriellen Schnittstelle (sofern angeschlossen) 
geschickt. 


Beachten Sie, da es sich hierbei um die Umstellung auf einen anderen Kanal 
handelt, was nicht mit dem Datei-Kopiervorgang mittels PIP zu verwechseln ist. 
Die beiden Befehle GET «Datei» und PUT-Datei> leiten die Konsolen-Eingabe bzw. 
-Ausgabe und die Drucker-Ausgabe um, wobei eine Datei und kein Gerate-Kanal 
benutzt werden soll. 
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PIP 


Das Dienstprogramm PIP (Peripheral Interchange Program) erméglicht den 
Transfer von Informationen zwischen dem Computer und seiner Peripherie. Die 
allgemeine Form des Befehls lautet: 


PIP-Ziel =:Quelle> 
Ziel} und Quelle’ kénnen entweder Dateinamen - in Quelle’ sind 


Universalzeichen erlaubt - oder logische Gerate sein. Folgende logische Gerate 
konnen verwendet werden: 


Als Quelle: Als Ziel: 
CON: Konsolen-Eingabe CON: Konsolen-Ausgabe 
AUX: Zusatzgerat-Eingabe AUX: Zusatzgerat-Ausgabe 
EOF: Markierung am LST: Drucker 
Ende der Datei PRN: Ein Drucker mit Tabulator- 


Erweiterung, Zeilen-Numerierung 
und Seiteneinteilung 


Beispiele: 
PIP B:=A:*.COM 

..Kopiert alle . COM-Dateien von Laufwerk A: nach Laufwerk B: . 
PIP KEYBOARD.CPM=KEYS.CCP 

..macht eine Kopie von KEYS.CCP und nennt sie KEYBOARD.CPM. 
PIP CON:=KEYS.CCP 


..gibt die Datei KEYS.CCP auf dem Bildschirm aus (dhnlich dem Befehl 
TYPE KEYS.CCP. 


PIP LST:=KEYS.CCP 


..gibt die Datei KEYS . CCP auf dem Drucker aus. 


PIP TYPEIN.TXT=CON: 


..ubernimmt die Tastatur-Eingabe und speichert sie in der Datei TYPEIN. TXT 
ab. 
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Beachten Sie, dali die letzte Operation mit dem Steuercode [CONTROL]Z 
abgeschlossen wird. Nach jedem [RETURN] muB fiir eine neue Zeile [CONTROL]J 
eingetippt werden. [CONTROL]J ist der ASCII-Code fiir den Zeilenvorschub. 


Wird PIP ohne Parameter eingetippt, erscheint das Bereitschaftszeichen * und 
Sie kénnen die gewtinschten Befehle eingeben. Diese Form der Operation ist 
besonders niitzlich, wenn Dateien kopiert werden sollen, ohne dal die 
PIP.COM-Datei auf der Quellen- oder Ziel-Diskette enthalten ist. Wir kénnen 
PIP von Seite 1 der Systemdisketten laden, die Systemdiskette herausnehmen 
und anschliefend die Disketten einlegen, die zum Kopieren gebraucht werden. 


Méchten Sie das PIP-Programm verlassen, driicken Sie [RETURN], wenn das 
Bereitschaftszeichen * erscheint. 


Dateien konnen auch dann mit PIP von einer Diskette auf eine andere kopiert 
werden, wenn nur ein Laufwerk verwendet wird. In dem Fall erscheinen 
automatisch die entsprechenden Bereitschaftszeichen zum Diskettenwechsel. Die 
Laufwerks-Bezeichnungen fiir Quellen- und Zieldiskette miissen sich 
unterscheiden. 


System-Verwaltung 


DIR, ERASE, RENAME und TYPE sind transiente Programme, die mehr 
Méglichkeiten bieten als die entsprechenden eingebauten Programme. 


Wie bei vielen anderen transienten Programmen von Digital Research werden 
sekundare Parameter in eckigen Klammern angegeben. In den HELP-Dateien 
(auf Seite 3 Ihres System-Diskettensatzes) finden Sie hierzu alle Einzelheiten. 
Beispiele: 


DIR CFULLI Anzeige von Datei-Gré8en und -Attributen. 


ERASE *.COM [CONFIRM] Fir jede einzelne Datei wird eine Bestatigung 
zu Loéschen verlangt. 


RENAME Alte und neue Dateinamen  missen 
eingegeben werden. 


RENAME *.SAV=*.BAK Alle Dateien vom Typ . BAK werden dem Typ 
. SAV zugeordnet. 

TYPE KEYS.WP CNOPAGE] Der Seiten-Stop auf dem Bildschirm wird 
unterdriickt. 


Die Datei-Attribute SYS (System) und RO (Read/Only = nur lesbar) wurden 
schon vorher erwahnt. Solche Attribute kénnen mit dem Befeh] SET (der auch 
Universalzeichen akzeptiert) zugeordnet werden. 
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Die Befehle: 


SET *.COM CROJ 
SET KEYS.CCP [RO] 
SET A: CRO] 


..versetzen Dateien oder ein Laufwerk in den Read/Only-Zustand, um sie vor 
versehentlichem Léschen zu schiitzen. 


Mit den Befehlen: 


SET *.COM CRW] 
SET KEYS.CCP CRW] 
SET A: CRW] 


..werden Dateien oder Laufwerk in den Read/Write- (Schreib-Lese-) Zustand 
zuruckversetzt. 


Die Befehle: 


SET *.COM [SYS] 
SET KEYS.CCP CSYS] 


...versehen Dateien mit dem System-Attribut. Dateien mit einem solchen Attribut 
werden nach dem DIR-Befehl nicht angezeigt. (Dazu ist DIRS oder DIRSYS 
erforderlich.) Trotzdem stehen diese Dateien noch zur Bearbeitung zur 
Verfigung. Wenn sie sich im Benutzer-Bereich 0 befinden, sind sie darttberhinaus 
von allen anderen Benutzern aufrufbar. 


Die Befehle: 


SET *.COM [CDIRI 
SET KEYS.CCP CDIR] 
..entfernen das System-Attribut. 


Jede Diskette kann mit einem Etikett (NAME) versehen werden, oder mit einem 
Kennwort (PASSWORD). Das Kennwort schiitzt das Inhaltsverzeichnis selber. 
Den einzelnen Dateien kann ebenfalls ein Kennwort zugeordnet werden. 


SET CNAME=ROLAND] 
SET CPASSWORD=SALLY] 
SET CPROTECT=0ON] 
..bezieht sich auf die Diskette im Standard-Laufwerk. 


SET *.*DPASSWORD=SALLYJ 
SET *.*CPROTECT=READ] 
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..bezieht sich auf die Dateien der Diskette im Standard-Laufwerk. (Die 
Universalzeichen *.* stehen fiir ‘alle Dateien’.) 

Der Befehl INITDIR (auf Seite 2 der Systemdisketten) versieht die Dateien im 
Standard-Laufwerk mit Datum und Uhrzeit. Jedesmal, wenn CP/M gestartet 
wird, muB 


DATE SET 


eingetippt werden, um die Uhr zu stellen. Ist sie einmal gestellt, wird sie 
einigermafen richtig laufen. Der 6128 stellt automatisch das richtige Datum ein. 
Mit den Befehlen DATE und DATE CONTINUOUS konnen Sie das Datum 
abfragen. 


ACHTUNG! Disketten, die mit Kennworten oder Etiketten versehen oder mit 
automatischer Datierung ausgertistet wurden, sollten danach NIEMALS von 


AMSDOS oder CP/M 2.2 beschrieben werden, da diese Méglichkeiten von 
diesen beiden Betriebssystemen nicht unterstiitzt werden. 


Im Normalfall wird immer auf die Diskette im Standard-Laufwerk zugegriffen, 
wenn kein Laufwerk spezifiziert wurde. Der Befehl: 


SETDEF *,A: 


..(in dem * fiir das Standard-Laufwerk steht) weist CP/M an, eine Datei erst auf 
dem Standard-Laufwerk und dann auf Laufwerk A: zu suchen. Ist B: Das 
Standard-Laufwerk, werden die Dateien automatisch auch dann gefunden, wenn 
sie sich auf Laufwerk A: befinden. 


Mit den Befehlen: 
SETDEF [CPAGE] 
und 
SETDEF CNOPAGE] 


..wird der automatische Seiten-Stop auf der Konsolen-Anzeige ein- bzw. 
abgeschaltet. 


Denken Sie daran, daB8 die meisten DEVICE-, SET- und SETDEF-Befehle, 
besonders, wenn sie sich auf Laufwerke und nicht auf Dateien oder Disketten 
beziehen, jedesmal zusammen mit dem Datum eingegeben werden miissen, wenn 
CP/M Plus gestartet wird. Diese Information wird am besten in einer geeigneten 
PROFILE. SUB-Datei zusammengestellt. 
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SUBMIT wird verwendet, um Dateien mit einzelnen Befehlen automatisch 
ablaufen zu lassen. Der Inhalt der Befehls-Dateien besteht aus Text und wenn 
eine Befehlszeile einer . SUB-Datei mit < beginnt, kann das Programm auch 
Eingabe-Zeilen enthalten. 


Der Befehl SHOW in seinen verschiedenen Auspragungen informiert tiber die 
Laufwerks-Kapazitat, den Speicherplatz, die Anzahl der freien Platze im 
Inhaltsverzeichnis, die Benutzer-Bereiche der vorhandenen Dateien und das 
Etikett der Diskette (sofern vorhanden). Die folgenden Beispiele beziehen sich 
alle auf Laufwerk B: . 


SHOW B: 

SHOW B:CLABELJ 
SHOW B:CUSERSI 
SHOW B:CDIR] 
SHOW B:CDRIVEI 


Ruckkehr zu BASIC 


Der Befehl AMSDOS beendet die Steuerung durch CP/M und tbergibt sie an das 
eingebaute Schneider-BASIC, unter dem die AMSDOS-Disketten-Befehle 
anwendbar sind. 


Programmieren fur Fortgeschrittene 


Seite 2 des System-Diskettensatzes enthalt einige Programme fiir fortgeschrittene 
und System-Programmierer. Wir empfehlen, hierfiir das CP/M Plus-Handbuch 
SW 971 oder ahnliche Unterlagen zu Rate zu ziehen. 


Wenn Sie mit CP/M 2.2 arbeiten 


Dieser Abschnitt stellt die Besonderheiten beim Betrieb mit CP/M 2.2 heraus. 


CP/M 2.2 wird von den beiden dufersten Spuren der System-Diskette geladen. 
Der Urlader-Bereich von CP/M 2.2 liegt an anderer Stelle als der von CP/M Plus, 
und die beiden sollten tunlichst nicht verwechselt werden. Es ist zwar moglich, 
Vendor- IBM- und Datenformat-Disketten in beiden Diskettenlaufwerken zu 
betreiben, aber aus Betriebsgriinden wird sich ihr Gebrauch auf das zweite 
Laufwerk beschranken. 
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Wenn keine besonderen Vorkehrungen durch das CP/M-Programm getroffen 
wurden (wie z.B. bei FILECOPY), erlaubt CP/M 2.2 solange keine 
Schreibzugriffe auf Diskette, bis sie dem System durch ein ‘Log-in’ bekannt ist. 
Der Format-Typ der Disketten (System-, Daten- oder IBM-Diskette) ist ebenfalls 
nur nach dem ‘Log-in’ bestimmbar. Diese Aufbereitung findet fiir das eingebaute 
Laufwerk (Drive A) immer dann statt, wenn CP/M in den direkten Konsol-Modus 
zurtickkehrt oder wenn [CONTROL]C nach dem Erscheinen von A> bzw. B> 
eingegeben wird. Fir das Zusatz-Laufwerk (Drive B) erfolgt das Log-In nach dem 
ersten Zugriff, sofern fir Laufwerk A bereits ein Log-In durchgefiihrt wurde. 


Wenn die Diskette ohne vorheriges Log-In beschrieben wird, erscheint die 
beriichtigte Fehlermeldung: 


Bdos Err on-Laufwerk>: R/0 


Zur Fortsetzung driicken Sie eine beliebige Taste. Wenn die ausgewechselte 
Diskette ebenfalls ein anderes Format besitzt, tritt ein Lese- oder Schreibfehler 
auf, Dann geben Sie C ein. 


Wenn Sie Software auf einer Diskette im Vendor-Format haben, kénnen Sie sie 
zu ihrer besseren Verwendung entweder mit FILECOPY oder PIP auf eine 
CP/M 2.2 System-Diskette kopieren, oder die Diskette in eine System-Diskette 
verwandeln, indem Sie Ihr CP/M daraufkopieren. Zu diesem Zweck stehen 
Ihnen die Befehle BOOTGEN und SYSGEN zur Verfiigung. Lesen Sie dazu bitte 
den Abschnitt tber das Endverbraucher-Lizenzabkommen im Anhang 1 
aufmerksam durch. 


SYSGEN (ohne Parameter) ist ein spezielles Kopierprogramm, das nach der 
Quellen- und Ziel-Diskette fragt, und die CP/M 2.2-System-Spuren von einer 
Diskette auf die andere kopiert. BOOTGEN kopiert in ahnlicher Weise Sektor 1, 
Spur 0 (den Lader) und das Konfigurations-Programm von einer Diskette auf die 
andere. 


Der DIR-Befehl hat (aufer einem Dateinamen) keine Parameter. Die 
Dateinamen sind nicht geordnet, sondern erscheinen in der Reihenfolge, wie sie 
in das Inhaltsverzeichnis eingetragen wurden. 


STAT besitzt ahnliche Funktionen wie SET und SHOW. Die Befehle: 


STAT 
STAT A: 
STAT B: 


..zeigen Disketten-Status und freien Speicherplatz an. 
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Die Befehle: 


STAT *.COM 
STAT DISC.BAS 


..geben ausfiihrlich Auskunft tiber den Eintrag einer bestimmten Datei im 
Inhaltsverzeichnis. 


Die Befehle: 


STAT *.COM $R/0 
STAT DISC.BAS $R/0 


..versetzen eine Datei in den Read/Only (nur lesbaren) Status, so daB sie nicht 
versehentlich tberschrieben werden kann. 


Die Befehle: 


STAT *.COM $R/W 
STAT DISC.BAS $R/W 


..stellen den Read/Write (schreib- und lesbaren) Status einer Datei wieder her. 
Die Befehle: 


STAT *.COM $SYS 
STAT SECRET.BAS $SYS 


..setzen eine Datei in den ‘System’-Zustand, so da8 sie beim Auflisten des 
Inhaltsverzeichnisses und bei Datei-Kopierprogrammen unsichtbar bleibt. Fir 
alle anderen Zwecke bleibt die Datei jedoch zuganglich. 


Die Befehle: 


STAT *.COM $DIR 
STAT SECRET.BAS S$DIR 


..versetzen eine Datei wieder vom  ‘System’-Zustand in den 
‘Inhaltsverzeichnis’-Zustand. 


Mit dem Dienstprogramm FILECOPY konnen Dateien unter Benutzung nur 
eines Laufwerks von einer Diskette auf eine andere kopiert werden. Hierzu 
miissen die Disketten entsprechend den Anweisungen auf dem Bildschirm 
gewechselt werden. Wird ein Dateiname mit Universalzeichen angegeben, fragt 
FILECOPY, ob tatsachlich jede Datei, die unter diesen Namen fallt, kopiert 
werden soll. Das Programm zeigt jeweils den Namen der Datei an, die gerade 
kopiert wird. 
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FILECOPY *.COM ..Kopiert alle Dateien vom Typ . COM. 
FILECOPY PIP.COM ..kopiert die Datei PIP.COM. 


DISCKIT2 erfiillt dieselbe Funktion wie DISCKIT3, mit dem Unterschied, da’ 
es etwas langsamer kopiert, da es weniger Speicherplatz zur Verfiigung hat. 


Zwei Dienstprogramme erméglichen den Datei-Transfer zwischen Diskette und 
Kassette. Mit Ausnahme spezieller Anwendungen ist es recht unwahrscheinlich, 
daB jemals andere als ASCII-Dateien iibertragen werden. 


CLOAD (Cassette LOAD) kann zwei Parameter annehmen. Der erste ist der 
Quellen- (Kassetten-) Dateiname, der in Anfiihrungsstrichen stehen mu8, der 
zweite ist der Ziel- (Disketten-) Dateiname. Wenn der Ziel-Dateiname 
ausgelassen wird, erhalt die Disketten-Datei den Namen der Kassetten-Datei. 
Wird der Quellen-Dateiname ausgelassen, so liest CLOAD die erste Datei, die es 
auf der Kassette findet. Die normalen Bildschirm-Hinweise zum Kassettenbetrieb 
entfallen, wenn der Kassetten-Dateiname mit einem Ausrufungszeichen 
! beginnt. 

Beispiel: 


CLOAD "MY LETTER" MYLETTER.TXT 


CSAVE (Cassette SAVE) kann drei Parameter annehmen. Der erste ist der 
Quellen- (Disketten-) Dateiname, der zweite ist der Ziel- (Kassetten-) Dateiname, 
der in Anfthrungsstrichen stehen mu’. Wenn der Ziel-Dateiname ausgelassen 
wird, erhalt die Kassetten-Datei den Namen der Disketten-Datei. Die normalen 
Bildschirm-Hinweise zum Kassettenbetrieb entfallen, wenn der 
Kassetten-Dateiname mit einem Ausrufungszeichen ! beginnt. Sind beide 
Dateinamen angegeben, kann ein dritter Parameter zur Bestimmung der 
Band-Schreibgeschwindigkeit (0 fiir 1000 Baud, 1 fiir 2000 Baud) verwendet 
werden. 


Beispiele: 


CSAVE OUTPUT.TXT "OUTPUT TEXT" 1 
CSAVE DATEN 


SETUP 


Mit diesem Dienstprogramm ko6nnen die Eigenschaften der CPC6128-Tastatur, 
des Disketten-Laufwerks und der seriellen Schnittstelle umdefiniert werden. 
Aufferdem kénnen damit beim Laden von CP/M 2.2 verschiedene Funktionen 
aufgerufen werden. Im Gegensatz zu den Dienstprogrammen von CP/M Plus, die 
ihre Funktion bei der Ausfiihrung des Programms erfillen, verandert SETUP 
den Konfigurationssektor einer Diskette (der nur beim Kalt-Start einer Diskette 
aufgerufen wird). In dieser Hinsicht ahnelt es dem 
PROFILE. SUB-Dienstprogramm. 
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Das SETUP-Programm ist Meni-gesteuert. Wenn eine bestimmte Aussage auf 
dem Bildschirm richtig ist, oder nicht geaéndert werden soll, wird zur nachsten 
Frage umgeschaltet, indem auf die Frage: 


Is this correct (Y/N) :_ 


..ein Y eingetippt wird. 
Das Programm kann mit [CONTROL]C abgebrochen werden. Wenn alle 
Anderungen durchgefithrt sind, erscheint am Ende: 


Do you want to update your system disc (Y/N) :_ 


An dieser Stelle haben Sie die Moglichkeit, die bisherige Konfiguration 
beizubehalten, indem Sie N eintippen. Haben Sie mit Y geantwortet, werden Sie 
gefragt: 


Do you want to restart CP/M (Y/N) :_ 
Damit haben Sie die Moglichkeit, durch Eingabe von Y die neue Konfiguration zu 
laden und zu testen. 


Um einen Konfigurations-Sektor auf eine andere Diskette zu kopieren, verwen- 
den sie BOOTGEN oder laden SETUP von der Quellen-Diskette, beantworten alle 
Fragen mit Y und legen vor Beantwortung der Frage 
‘Do you want to update your system disc (Y/N):_’ die Ziel- 
Diskette ein. 


Zeichen mit einem ASCII-Wert kleiner dezimal 32 k6énnen in einen String 
integriert werden, indem { gefolgt von einem geeigneten Zeichen aus dem 
Satz @,A-2Z,(,\,],>,_ eingegeben wird. 


Die folgenden Optionen verlangen besondere Aufmerksamkeit: 
xk Initial Command Buffer (Befehls-Puffer) 


Alle hier eingegebenen Zeichen erscheinen, als waren sie beim ersten Laden von 
CP/M unter dem direkten Konsol-Modus eingegeben worden. Dies fihrt zum 
automatischen Start eines bestimmten Programms. Denken Sie daran, statt der 
[RETURN]-Taste die beiden Zeichen { M zu verwenden. 


Zum Automatik-Start von DIR sollte der Befehls-Puffer also: 
DIRTM 


.enthalten. Und zum Automatik-Start des Dr.LOGO-Pregramms miiBte der 
Befehlspuffer: 
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SUBMIT LOGO21M 
..enthalten. 
Sign-on string 


Dies ist die beim ersten Laden von CP/M am oberen Bildschirmrand erscheinende 
Meldung. Fur Wagenriicklauf und Zeilenvorschub ist { J tM zu verwenden. Der 
erste Teil der Standard-Meldung  setzt geeignete Bildschirm- und 
Bildschirmrand-Farben fiir den 80-Spalten-Modus fest und sollte genau kopiert 
werden, wenn er beibehalten werden soll. 


Keyboard translations 


Hierdurch kénnen den Tasten neue ASCII-Werte zugeordnet werden, ahnlich dem 
BASIC-Befehl KEYDEF. Die erforderlichen Parameter sind die Tasten-Nummer 
und der zugehorige ASCII-Wert. Eine Aufstellung der Tasten-Nummern finden 
Sie rechts vom Tastenfeld auf Ihrem Computer oder im 4.Teil des Kapitels 
‘Ubersicht’. 


Keyboard expansions 


Gleicher Effekt wie beim BASIC-Befehl KEY. 


Nachsatz 


Die Befehle DISCKIT2, SYSGEN, BOOTGEN, FILECOPY, SETUP, CSAVE 
und CLOAD sind ausschlieflich fiir den Betrieb mit CP/M 2.2 auf Schneider 
CPC-Computer-Systemen konzipiert. Sie funktionieren auf keinem anderen 
CP/M-System, obgleich andere Hersteller ahnliche Dienstprogramme (oft mit 
gleichen Namen) fiir ihre Hardware anbieten. 


Die folgenden CP/M 2.2-Programme auf Seite 4 dienen speziellen Anwendungen. 
Wir empfehlen, hierfiir das CP/M Plus-Handbuch SW 971 oder 4dhnliche 
Veroffentlichungen zu Rate zu ziehen. 


ASM 8080 Assembler 

DDT 8080 Assembler-Code-Testhilfe 

DUMP Dienstprogramm fiir hexadezimale Datei-Ausgabe 

ED Kinfacher Text-Editor 

LOAD Verwandelt eine durch ASM erstellte . HEX-Datei in eine 
- COM-Datei 

MOVCPM Erstellt eine neue Version von CP/M 2.2 in anderem 
(kleinerem) TPA-Format. 

SUBMIT Stapel-Verarbeitung (Batch) aus dem Konsol-Modus 

XSUB Stapel-Verarbeitung (Batch) durch transiente Programme. 


Diese Programm werden mit CP/M 2.2 (Seite 4) betrieben, und sollten nicht mit 
CP/M Plus-Programmen auf den Seiten 1, 2 und 3 verwechselt werden. 
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Kapitel 6 
Einfuhrung in LOGO 


Dieses Kapitel fihrt anhand von Beispielen in die 
Programmiersprache LOGO ein und bietet eine Ubersicht tiber 
die verfiigbaren Befehle. Es sollte jedoch nicht als 
erschépfendes Lehrbuch oder Nachschlagewerk betrachtet 
werden. Hierfiir verwenden Sie besser den LOGO-Fthrer 
SW160. 


Folgende Themen werden behandelt: 


Der Begriff LOGO 

Laden und Programmablauf von Dr. LOGO 
Schildkréten-Graphik 

Schreiben eigener Prozeduren 

Editieren eigener Prozeduren 


we >t > > >t 


Was ist LOGO? 


LOGO kann aus Ihnen einen guten Programmierer machen, gleichgiiltig, ob Sie 
schon Programmiererfahrung haben oder nicht. LOGO ist eine leistungsfahige 
Programmiersprache, die aufgrund ihrer leichten Erlernbarkeit schnell popular 
wurde. 


Sie benutzen Prozeduren als Bausteine fir die Erstellung von 
LOGO-Programmen. Dr.LOGO selbst besteht aus einer Sammlung von 
Grundprozeduren (Primitives), die zum Aufbau eigener Programme verwendet 
werden kénnen. 


Wahrend der 70er Jahre entwickelte ein Team von Computer-Spezialisten unter 
der Leitung von Seymour Papert die Programmiersprache LOGO mit 
Schildkréten-Graphik, um Kindern den Umgang mit Computern zu erleichtern. 


Sie entwickelten die Schildkréte, damit Kinder ein ‘Denk-Objekt’ (Papert) haben, 
sozusagen ein Werkzeug zum Lernen auf Computern. In Form einer Pfeilspitze 
kann die Schlidkréte mit einfachen Befehlen tiber den Bildschirm gefiihrt werden. 
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Dr.LOGO 


Dr. LOGO ist eine besondere LOGO-Version, die an den Schneider Personal 
Computer angepafit wurde, um das Programmieren zu erleichtern. Es wurden 
umfangreiche Erweiterungen eingebaut, um die groBartigen Sound-Méglichkeiten 
des CPC6128 auszunutzen. Die Programm-Bearbeitung wurde durch das 
Kinbeziehen der Cursortasten erleichtert. 


Start von Dr. LOGO 


Um mit Dr.LOGO zu arbeiten, legen Sie zunachst eine Kopie der Seite 1 Ihrer 
Systemdisketten in das Laufwerk und schreiben: 


1CPM 


Sobald das Zeichen A> erscheint, nehmen Sie die Diskette wieder heraus und 
legen Seite 3 (mit den Programmen DR.LOGO und HELP) ein. Um das 
Programm Dr.LOGO zu starten, schreiben Sie nun: 


SUBMIT LOGO3 


Nach wenigen Sekunden erscheint der Begriiungstext mit dem 
Bereitschaftszeichen ?. 


Start von Dr. LOGO mit CP/M 2.2 


HINWEIS: Auf Seite 4 der Systemdisketten finden Sie eine andere 
Dr.LOGO-Version fiir den Fall, da&B Sie mit dem CP/M 2.2 Betriebssystem 
arbeiten, das fur die Modelle Schneider CPC664 und CPC464+DDI1 
verwendet wird. Im allgemeinen ist nicht zu empfehlen, diese Version auf 
dem CPC6128 laufen zu lassen. Die Version von Seite 3 entspricht 
vollstandig dem Dr.LOGO von Digital Research. 


Falls Sie jedoch aus irgenwelchen Griinden mit dem Dr.LOGO fiir CP/M 2.2 


arbeiten méchten, schieben Sie Seite 4 ins Laufwerk und schreiben: 
ICPM 

Sobald das Zeichen A> erscheint, schreiben Sie: 
SUBMIT LOGO2 


Nach wenigen Sekunden erscheint der Begrii®ungstext mit dem 
Bereitschaftszeichen ?. 
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Erste Versuche 


Das Prompt ? bedeutet, da8 Dr.LOGO darauf wartet, da8 Sie etwas eintippen. 
Tippen Sie (in Kleinbuchstaben): 


fd 60 


ein, und es erscheint eine Schlidkréte (ein grofer Pfeil), die 60 Einheiten 
vorwarts marschiert und dabei von ihrem Startpunkt bis zum Endpunkt eine 
Linie zeichnet. Der Bildschirm wird daraufhin geléscht und in einen grofen 
Graphik- und einen kleinen Text-Bereich unterteilt. Letzterer beginnt mit dem ? 
am unteren Bildschirmrand. 


Dr.LOGO wird des 6fteren die Bildschirmbereiche neu einteilen, um je nach Ihren 
Bedurfnissen den Text- oder Graphik-Bereich zu vergrofern. 


Schreiben Sie: 
rt 98 
Die Schildkréte dreht sich jetzt um 90 Grad nach rechts. Nun schreiben Sie: 
fd 68 
..woraufhin eine genauso lange Linie im rechten Winkel zur ersten gezeichnet 


wird. 


Experimentieren Sie mit den einfachen Anweisungen fd (Abkirzung fur 
‘forward’), bk (‘back’), rt (‘right’) und Lt (‘eft’) und beobachten Sie, was auf dem 
Bildschirm geschieht. 


Dr. LOGO Prozeduren 


Eine Prozedur ist eine Folge von Befehlen, die Dr.LOGO anweisen, eine 
bestimmte Aufgabe auszufihren. 


Sie werden Ihre ersten Prozeduren schreiben, indem Sie eingebaute 
Dr.LOGO-Grundprozeduren zusammenfigen. 


fd, bk, rt und Lt sind fertige Grundprozeduren (Primitives), die Sie jederzeit 
als Bausteine fiir Ihre eigenen Prozeduren verwenden kénnen. 


Eine weitere sehr niitzliche Grundprozedur ist cs (‘clear screen’), die den 
Bildschirm léscht und die Schildkréte an ihren Ausgangspunkt zuriicksetzt. 
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Schreiben einer einfachen Prozedur 


Ks ist leicht zu erkennen, dal} die Anweisungen: 

fd 60 rt 90 
..ein Quadrat mit der Seitenlange 60 ergeben, wenn sie viermal wiederholt 
werden. 


Derselbe Effekt kann durch die einfache Formel erzielt werden: 
repeat 4 (fd 6@ rt 9@) 


Léschen Sie den Bildschirm, geben Sie diese Formel ein und beobachten Sie, was 
geschieht. 


Um aus dieser Formel eine neue Prozedur mit dem Namen ‘quadrat’ zu machen, 
tippen Sie: 


to quadrat 
repeat 4 (fd 60 rt 98) 
end 


Dr.LOGO wird von nun ab verstehen, was ‘quadrat’ bedeutet und jedesmal ein 
Quadrat zeichnen, wenn er auf das Wort ‘quadrat’ trifft. Wir hatten dieser 
Prozedur jeden beliebigen Namen geben konnen. Es wurde jedoch ‘quadrat’ 
gewahlt, um daran zu erinnern, was diese Prozedur bewirkt. 


Dr.LOGO erméglicht die Eingabe einer ganzen Serie von Befehlen. So werden bei: 
quadrat rt 45 quadrat 


..Zwei um 45 Grad gegeneinander versetzte Quadrate gezeichnet. 


Prozeduren mit Parametern 


Genauso wie wir bei eingebauten Dr.LOGO-Prozeduren angeben k6énnen, wie oft 
sie wiederholt werden sollen, kénnen wir auch selbst Prozeduren erstellen, die 
beliebig oft wiederholbar sind. Um eine Prozedur zur Darstellung von Quadraten 
mit unterschiedlicher Seitenlange zu erstellen, kann die Definition von ‘quadrat’ 
folgendermagen abgeandert werden: 


to verschiedenequadrate :seite 


repeat 4 (fd :seite rt 98) 
end 
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Diese neue Prozedur fiihrt eine Variable mit dem Namen :seite ein. Der 
Doppelpunkt vor dem Variablennamen ist ein Unterscheidungsmerkmal. Er gibt 
an, da es sich um eine Variable und keinen Befehl handelt. 


Wenn wir die Prozedur verschiedenequadrate :seite_ benutzen, 
brauchen wir fir die Variable :seite einen Wert. Der  Befehl 
verschiedenequadrate 159 wird also ein Quadrat mit einer Seitenlange 
von 150 Einheiten zeichnen. 


Versuchen Sie, zwei Prozduren zusammenzufiigen, und sehen Sie, was passiert. 
Geben Sie dazu beispielsweise ein: 


cs verschiedenequadrate 108 rt 45 verschiedenequadrate 15@ 


Die Schildkréte zeichnet zwei verschieden grofe Quadrate, die im Winkel von 45 
Grad gegeneinander versetzt sind. 


Beachten Sie, wie Dr.LOGO Sie mit einem Ausrufungszeichen ! darauf 
aufmerksam macht, da8 die Folge von Befehlen tber die Bildschirmzeile 
hinausgeht. 


Anwendung von Variablen 
Dr.LOGO erméglicht durch die Verwendung von Variablen sowohl die Ubergabe 
von Werten an Prozeduren, als auch die Abfrage dieser Werte. 
Definieren Sie zunachst eine Prozedur mit dem Namen ‘dreieck’: 
to dreieck 


repeat 3 (fd :kante rt 126) 
end 


Wir k6énnen diese Prozedur testen, indem wir 


make "kante 10686 
dreieck 


..eingeben. Wenn wir den Wert von :kante wissen wollen, brauchen wir nach 
der Prompt-Meldung ? nur :kante einzugeben, und Dr.LOGO gibt den Wert 
auf dem Bildschirm aus. 


SchlieBlich soll die Variable :kante in einer Prozedur verwendet werden, um 
ein Muster zu zeichnen. Beachten Sie, wie der Wert der Variablen, und somit das 
Muster, in jedem Durchgang gréfer wird. 
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to muster 

dreieck lt 6@ dreieck rt 60 
make “kante :kante + 4 
muster 

end 

make "kante 10 

cs muster 


Wenn Sie genug gesehen haben, driicken Sie [ESC], um das Programm zu 
stoppen. 


Editieren von Programmen und Prozeduren 


Dr. LOGO erméglicht die Korrektur von Eingabefehlern und die Anderung von 
selbstdefinierten Prozeduren. Folgende LEditier-Tasten stehen hierfiir zur 
Verfiigung: 

- die Cursor-Tasten <7 |, die den Cursor um jeweils eine Stelle 
weiterbewegen. 


- Werden die Cursor-Tasten gleichzeitig mit der [CONTROL]-Taste gedriickt, wird 
der Cursor zum Anfang oder Ende der Seite, bzw. zum linken oder rechten Rand 
einer Zeile bewegt. 

- [CLR] léscht das Zeichen, auf dem der Cursor steht, [DEL] léscht das Zeichen 
links vom Cursor. 

- Die [RETURN]-Taste driicken Sie, wenn Sie mit der Editierung einer Zeile fertig 
sind, oder bevor Sie eine neue Zeile in die Prozedur einschieben. 

- [ESC] bedeutet Abbruch, und [COPY] teilt Dr. LOGO mit, daB die Bearbeitung 
einer Prozedur abgeschlossen ist. 

Wenn Sie Befehle oder neue Prozeduren eingeben, editieren Sie einfach den Text 
auf dem Bildschirm. Einfiigungen kénnen dort vorgenommen werden, wo sich der 
Cursor befindet. 

Um eine bereits bestehende Prozedur zu andern, benutzen Sie den Befehl ed. 
Dr.LOGO bringt Ihnen dann die alte Version der Prozedur auf den Bildschirm, 
und Sie kénnen mit dem Cursor wie oben beschrieben auf dem Bildschirm 
herumfahren und den Text andern. Andern Sie die Prozedur ‘muster’, indem 
Sie schreiben: 


ed "muster 
Probieren Sie nun die Kditier-Tasten aus. Wenn Sie fertig sind und [ESC] 


drticken, vergift Dr.LOGO alle Anderungen und gibt Ihnen die Originalversion 
in unveranderter Form zurtick. Tippen Sie noch einmal: 
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ed "muster 


..ein, ersetzen Sie die Zahl 4 durch 8, steigen Sie mit [COPY] aus und lassen Sie 
die Prozedur nochmal laufen. Sie sehen jetzt, wie sich der Bildschirm-Ausdruck 
geandert hat. Vergessen Sie nicht, den Anfangswert von :kante zu setzen. 


Bedienungshinweise 
Der Arbeitsbereich von Dr.LOGO ist in Knoten (nodes) unterteilt. Wenn Sie: 


nodes 


..eintippen, kénnen Sie sich die Zahl der freien Knoten anzeigen lassen. 
Gelegentlich, wenn fast alle Knoten belegt sind, reorganisiert Dr.LOGO den 
Arbeitsbereich. Die Schildkréte pausiert dann. Sie kénnen Dr.LOGO auch direkt 
auffordern, den Arbeitsbereich neu zu ordnen, indem Sie: 


recycle 


..eintippen. Auf diese Weise kénnen Sie die Bearbeitung fortsetzen, wenn 
Dr.LOGO gemeldet hat, da8 keine Knoten mehr frei sind. 

Wenn Sie mit der CP/M 2.2 Version von Dr.LOGO (auf Seite 4 der 
Systemdisketten) arbeiten, vergewissern Sie sich, daf auf der Diskette 
hinreichend Speicherplatz frei ist, im Ihre Prozeduren zu sichern. Sie kénnen den 
freien Speicherplatz unter AMSDOS mit dem CAT-Befehl abfragen (siehe Teil 7 
in Kapitel 1). 

Sehen Sie sich die folgenden Abschnitte dieses Kapitels an, und probieren Sie ein 
paar Beispiele aus - auch wenn Sie nicht gleich alles auf Anhieb verstehen! Je 
mehr Sie sich mit Dr. LOGO beschaftigen, desto mehr Befehle werden Sie in Ihre 
Prozeduren einbauen kénnen. 


Wenn Sie Dr.LOGO verlassen wollen, schreiben Sie: 


bye 


Verzeichnis der Dr. LOGO-Grundprozeduren 


Dieser Abschnitt fiihrt die Dr. LOGO-Grundprozeduren (teilweise mit Beispiel) in 
alphabetischer Reihenfolge auf. 


HINWEIS: Befehle, die mit einem Sternchen * versehen sind, kénnen nicht 
in der CP/M 2.2 Version von Dr.LOGO (auf Seite 4 der Systemdisketten) 


verwendet werden. Programme, die solche Befehle enthalten, kénnen 
deshalb nicht auf dem CPC664 oder CPC464 + DDII1 laufen, die beide nur 
mit dem Betriebssystem CP/M 2.2 ausgeriistet sind. 
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Worter- und Listen-Verarbeitung 


(In den folgenden Beispielen werden die Prompt-Zeichen ? und > mit angezeigt.) 


ascii 

Gibt den ASCII-Wert des ersten Zeichens im eingegebenen Ausdruck an. 
2ascii "G 
71 


2ascii "g 
183 


bf 

(but first) Gibt alle Zeichen des eingegebenen Ausdrucks, bis auf das erste, aus. 
?bf "klagen 
lagen 


?bf C1 2 3] 
[2 3] 


bl 


(but last) Gibt alle Zeichen des eingegebenen Ausdrucks, bis auf das letzte, aus. 
bl "klagen 
klage 


?bl £1 2 3 4) 
C1 2 3] 


char 


(character) Gibt das Zeichen aus, das dem ASCII-Wert der eingegebenen Zahl 
entspricht. 


?char 83 
$ 
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count 
Gibt die Anzahl der Elemente des eingegebenen Ausdrucks an. 


?count "sechs 

5 

?count [8 1 2 3] 
4 


emptyp 


Gibt TRUE (richtig) aus, wenn der eingegebene Ausdruck ein leeres Wort oder 
eine leere Liste ist; andernfalls erscheint FALSE (falsch). 

2emptyp " 
TRUE 
2emptyp CI 
TRUE 
2emptyp Cx] 
FALSE 
?make "x EC] 
?emptyp :x 
TRUE 


first 


Gibt das erste Element eines angegebenen Ausdrucks wieder.Die Klammern 
werden dabei weggelassen. 


first "zebra 


z 
2first £1 2 3] 
1 


fput 


(firstput) Gibt einen neuen Ausdruck aus, in dem der erste eingegebene Ausdruck 
zum ersten Element des zweiten Ausdrucks wird. 


?fput “"k "Lage 
klage 

?fput 1 C2 3] 
C1 2 3] 
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item 
Gibt das genannte Element des eingegebenen Ausdrucks an. 


2item 4 "klagen 
g 


last 
Gibt das letzte Element eines Ausdrucks aus. (Gegensatz zu first) 


2last "zuletzt 
t 


a 


Ic 


(lower case) Gibt alle Buchstaben des Ausdrucks in Kleinschreibweise aus. 
(Gegensatz zu uc) 


?le "KLEIN 
klein 


list 


Gibt die eingegebenen Ausdriicke als Liste aus, wobei die 4uferen Klammern 
erhalten bleiben. (Vergl. se) 


2(list 12 3 4) 

C1 2 3 4] 

?list "“grosse CklappeJ 
Cgrosse ECklappel]J 
(list) 

C] 


listp 


Gibt TRUE (richtig) aus, wenn es sich bei dem eingegebenen Ausdruck um eine 
Liste handelt, andernfalls erscheint FALSE (falsch). 


?listp "mutter 

FALSE 

2listp Cvater bruder schwester] 
TRUE 
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x 


lput 


(lastput) Gibt einen neuen Ausdruck aus, bei dem der erste eingegebene 
Ausdruck zum letzten Element im zweiten Ausdruck wird. 


?lLput “e "viel 


viele 

2lput “e Cviel] 

Cviel e] 
memberp 


Gibt TRUE aus, wenn der erste eingegebene Ausdruck ein Element des zweiten 
ist. 


?memberp "2 "“prozedur 

TRUE 

?memberp "schokolade Clvanille]£[schokoladeJ]Cerdbeer]] 
FALSE 

?memberp Cschokolade] [vanillel[£schokoladel]Cerdbeer]] 


TRUE 
numberp 
Gibt TRUE aus, wenn der eingegebene Ausdruck eine Zahl darstellt. 


?numberp 374.926 

TRUE 

?numberp "sechs 

FALSE 

?numberp first C2 4 5 8] 
TRUE 


piece 


Gibt einen Ausdruck aus, der die angegebenen Elemente des eingegebenen 
Ausdrucks enthalt. 


?piece 3 6 "Pfaffenhofen 

affe 

?piece 2 4 CNana John Michael Wendy Tinkerbeil] 
[John Michael Wendy] 
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se 


(sentence) Gibt die eingegebenen Ausdrticke als Liste aus, wobei die auferen 
Klammern weggelassen werden. (Vergl. List) 


?make "befehls_liste rl 
repeat 4 Cfd 58 rt 9@] 
?run (se "cs sbefehls_liste "ht) 


Hinweis: Das Unterstreichungszeichen zwischen Befehls und liste finden Sie auf 
der 0-Taste. 


shuffle 


Gibt eine Liste aus, in der die Elemente der eingegebenen Liste in zufalliger 
Reihenfolge aufgeftthrt sind. 


shuffle Ca bc dj 
{ce b d a] 


uc 


(upper case) Gibt die Buchstaben des eingegebenen Ausdrucks in Grofischreibung 
wieder. (Gegensatz zu Lc) 


?uc "gross 
GROSS 


* 


where 


Bezieht sich auf die letzte memberp-Grundprozedur. Gibt an, an welcher Stelle 
der erste Ausdruck im zweiten Ausdruck erscheint. 


?memberp “z “prozedur 
TRUE 
?show where 
4 
word 


Setzt ein Wort aus mehreren eingegebenen Wortern zusammen. 


?word "sonnen "schein 
sonnenschein 
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wordp 

Gibt TRUE aus, wenn der eingegebene Ausdruck ein Wort oder eine Zahl ist. 
?wordp "hallo 
TRUE 


?wordp C] 
FALSE 


Arithmetische Operationen 


arctan 

Gibt den Arcus-Tangens der eingegebenen Zahl in Winkelgraden aus. 
2arctan QB 
0 


arctan 1 
45 


cos 
Gibt den Cosinus des in Grad eingegebenen Winkels aus. 


°cos 6G 
@.5 


int 
Gibt den ganzzahligen Anteil einer eingegebenen Zahl aus. 


2?int 4/3 
1 


quotient 
Gibt den ganzzahligen Quotienten der beiden eingegebenen ganzen Zahlen aus. 


?quotient 14 4 
3 

2414/4 

3.5 
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random 
Gibt eine positive Zufallszahl aus, die kleiner als die eingegebene Zahl ist. 


2random 20 
7 


* 


remainder 


Gibt den ganzzahligen Rest aus, der nach der Division der ersten durch die zweite 
Zah] bleibt. 


?remainder 7 3 
1 
?remainder 8 4 


0 


* 


rerandom 


Bewirkt, dafi die nachste Zufallszahl dieselbe Folge von Zufallszahlen erzeugt wie 
beim letzten Mal. 


?repeat 18 [(type random 18 char 9)] 
13753264 2 6 

2repeat 1@ [C(type random 1@ char 9)] 
499106135 1 

?rerandom 

2repeat 18 C(type random 16 char 9)] 
5290316237 

?rerandom 

2repeat 1@ C(type random 18 char 9)]J 
529686316237 


* 

round 

Rundet die eingegebene Zahl zu einer ganzen Zahl. 
2?round 3.333333 
3 


?round 3.5 
4 
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sin 
Gibt den Sinus des in Grad eingegebenen Winkels aus. 


2sin 36 
@.5 


+ 


Gibt die Summe der eingegebenen Zahlen aus. 


2+ 2 2 
‘ 

22+2 

4 


Gibt die Differenz der beiden eingegebenen Zahlen aus. 


?- 18 5 
5 

210-5 

5 


* 


Gibt das Produkt der eingegebenen Zahlen aus. 


/ 


Gibt den Quotienten der beiden eingegebenen Zahlen aus. 


2/ 25 5 
5 

22575 

5 


Einfiihrung in LOGO 


Kapitel 6 Seite 15 


Logische Operationen 


and 
Gibt TRUE aus, wenn das Ergebnis aller eingegebenen Ausdricke wahr ist. 


2and (3<4) (7>4) 
TRUE 


not 


Gibt TRUE aus, wenn der eingegebene Ausdruck falsch ist. 
Gibt FALSE aus, wenn der eingegebene Ausdruck wahr ist. 


not (3=4) 
TRUE 
?not (3=3) 
FALSE 


or 
Gibt FALSE aus, wenn alle eingegebenen Ausdriicke falsch sind. 


2or "TRUE "FALSE 
TRUE 

20r (€3=4)(1=2) 
FALSE 


Gibt TRUE aus, wenn beide eingegebenen Ausdriicke gleich sind, andernfalls 
wird FALSE ausgegeben. 


2?= "LOGO "LOGO 
TRUE 
21=2 
FALSE 


> 


Gibt TRUE aus, wenn der erste Ausdruck gréfer als der zweite ist, andernfalls 
erscheint FALSE. 


2?> 19 20 
FALSE 
2728>19 
TRUE 
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< 


Gibt TRUE aus, wenn der erste Ausdruck kleiner als der zweite ist, andernfalls 
erscheint FALSE. 


2< 27 13 
FALSE 
213<27 
TRUE 


Variablen 


local 


Macht die angegebene(n) Variable(n) nur fiir die momentane Prozedur und 
Prozeduren, die von ihr aufgerufen werden, zuganglich. 


>Clocal "x "y “z) 


make 
Weist der angegebenen Variablen den nachfolgenden Wert zu. 


2make "seite 5@ 
? :sseite 
56 


* 


namep 
Gibt TRUE aus, wenn das eingegebene Wort eine definierte Variable darstellt. 


?make "geschmack "schokolade 
?:geschmack 

schokolade 

?namep "“geschmack 

TRUE 

?namep "schokolade 

FALSE 
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thing 
Gibt den Wert der angegebenen Variablen aus. 


?make “computer "schneider 
?thing "computer 
schneider 


Prozeduren 
define 


Macht die eingegebene Liste von Definitionen zur Definition des angegebenen 
Prozedurnamens. 


?define "sag.hailo CLJ Cpr "hallol] 
?po "sag.hallo 

to sag.hallo 

pr "hallo 

?text "sag.hallo 

COI Cpr “hallol] 

end 


end 


Zeigt das Ende einer Prozedur-Definition an; mu8 alleine am Beginn der letzten 
Zeile stehen. 


?to quadrat 

>repeat 4 Cfd 50 rt 98] 
>end 

quadrat defined 
?quadrat 


po 


(print out) Zeigt die Definition(en) der eingegebenen Prozeduren oder Variablen 
an. 


2po "“quadrat 

to quadrat 

repeat 4 Cfd 5@ rt 9@] 
end 
make 
?po "x 
x is 3 


x 3 
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pots 


(print out titles) Zeigt die Namen und Bezeichnungen aller Prozeduren im 
Arbeitsspeicher auf dem Bildschirm an. 


?pots 
* 
text 
Gibt die Definitionsliste der angegebenen Prozedur aus. 


?to stern ;fuenfzackiger stern 

>repeat 5 Cfd 38 rt 144 fd 30 lt 72] 

>end 

stern defined 

?text "stern 

[CJ Crepeat 5 Cfd 38 rt 144 fd 38 It 72]]] 
to 
Kennzeichnet den Beginn einer Prozedur-Definition. 


?to quadrat 

>repeat 4 [fd 58 rt 96] 
>end 

quadrat defined 


Editier-Befehle 
ed 


(edit) Ladt die angegebenen Prozedur(en) und/oder Variable(n) in den 
Bildschirm-Editierbereich. 


2ed "quadrat 
* 
edall 


Ladt alle Variablen und Prozeduren, die sich im Arbeitsbereich befinden, zum 
Editieren in den Bildschirm-Editierbereich. 


2edall 
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edf 


Ladt die angegebene Disketten-Datei direkt in den Bildschirm-Editierbereich, 
oder erstellt eine neue Datei mit einem leeren Bildschirm-Editierbereich. 


2edf "stern 


Drucker-Funktionen 


* 


copyon 


Beginnt mit der Textausgabe auf dem Drucker. 


?copyon 


copyoff 
Beendet die Textausgabe auf dem Drucker. 


?copyof f 


Text-Bildschirm 


ct 


(clear text) Léscht den gesamten Text in dem Fenster, in dem sich der Cursor 
momentan befindet, und setzt den Cursor dann in die linke obere Ecke des 


Fensters. 
Ret 


a 


cursor 


Gibt an, auf welchem Koordinatenpunkt (Nummer der Spalte und Zeile) des 


Fensters sich der Cursor gerade befindet. 


2cet 
?cursor 
[@ 1] 


2(type CDer Cursor befindet sich auf dem Koordinatenpun 


kt\] show cursor 


Der Cursor befindet sich auf dem Koordinatenpunkt [32 2 


3] 
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Einfihrung in LOGO 


pr 


(print) Stellt die Eingabe(n) auf dem Text-Bildschirm dar, enfernt die auferen 
Klammern der Liste und fangt nach der letzten Eingabe eine neue Zeile an. 
(Vergl. show und type) 


2pr Ca b c]J 
abe 


* 
setcursor 


Setzt den Cursor an den Koordinatenpunkt, der in der Koordinaten-Liste auf dem 
Text-Bildschirm eingegeben wurde. 


?ct 
?to bild 
>make "x random 26 
>make "y random 12 
>setcursor list :x ty pr "* 
>end 
?bild 
setsplit 
Legt die Anzahl! der Zeilen im geteilten Bildschirmbereich fest. 


®setsplit 10 


show 

Stellt die Eingabe(n) auf dem Text-Bildschirm dar, wobei die 4u8eren Klammern 
der Liste erhalten bleiben, und fangt nach der letzten Eingabe eine neue Zeile an. 
(Vergl. pr und type). 


?show Ca b c] 
Ca b cl 


ts 


(text screen) Macht den gesamten Bildschirm zum Text-Bildschirm. 


7ts 
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type 
Stellt die Eingaben auf dem Text-Bildschirm dar, entfernt die 4uBeren Klammern 
der Liste und fangt nach der letzten Eingabe keine neue Zeile an. (Vergl. pr und 


show) 


2type Ca b cl 
abc 


Graphik-Bildschirm 


Beachten Sie, da8 sich der Bildschirm im Modus 1 befindet, vier verschiedene 
Farben darstellen kann und dasselbe Koordinaten-System wie Schneider-BASIC 
verwendet. Mit anderen Worten, alle Bildschirmpositionen werden zum nachsten 
geradzahligen Bildschirmpunkt hin gerundet. Rot, Griin und Blau kénnen die 
Werte 0, 1 oder 2 annehmen. 


clean 
Léscht den Graphik-Bildschirm mit Ausnahme der Schildkrote. 


2fd 58 
2clean 


cs 


(clear screen) Loscht den Graphik-Bildschirm und setzt die Schildkréte auf die 
Position (0,0), mit Ausrichtung nach 0 (Nord). Der Zeichenstift ist aktiviert. 


rt 98 fd 56 
2cs 


dot 


Zeichnet einen Punkt, der durch die eingegebene Koordinaten-Liste festgelegt ist, 
in der momentanen Zeichenstift-Farbe. 


?dot [58 10] 
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dotc 


Gibt die Nummer fiir die Farbe an, in der der Punkt der angegebenen 
Koordinaten-Liste dargestellt ist. 


2cs 

?setpc 1 

2?dot C-58 58] 
?setpc 2 

?dot [58 56] 
?setpc 3 

dot (58 -56] 
2?dotc [58 58] 


2 
2dotc [-508 -5@] 
4) 
2dotc (1800 3000] 
-1 

fence 


Errichtet einen ‘Zaun’,der die Bewegungen der Schildkréte auf den sichtbaren 
Graphik-Bildschirm begrenzt. window léscht die Grenze wieder. 


?fence 


2fd 300 
Turtle out of bounds 


fs 
(full screen) Macht den gesamten Bildschirm zum Graphik-Bildschirm. 


fs 
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pal 


(palette) Gibt die einem Zeichenstift zugeordneten Farbwerte fir Rot, Grin und 
Blau aus. 


?pal 2 
C@ 2 2] 


* 


setbg 


(set background) Farbt den Hintergrund des Graphik-Bildschirms mit der Farbe 
ein, die der eingegebenen Nummer zugeordnet ist. 


sf 
[8 $$ 5 FENCE 1] 


(Hiermit wird angegeben, dafi der Hintergrund auf 0 gesetzt ist.) 


2pal @ 

(@ 8 1] 

?setbg 2 

2s f 

C2 sS 5 FENCE 1) 


setpal 


(set palette) Setzt die Farb-Palette fiir den Zeichenstift fest, d.h. ordnet inm Werte 
fur die Farben Rot, Griin und Blau zu. 


?setpal 3 C1 1 2] 


?pal 3 
C1 1 2] 
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* 


setscrunch 
Setzt das Seitenverhaltnis des Graphik-Bildschirms auf die eingegebene Zahl fest. 


Isf 

C@ SS 5 FENCE 1] 
2to kreis 
>repeat 366 Cfd 1 rt 1] 
>end 

kreis defined 
?setscrunch 2 
asf 

C@ SS 5 FENCE 2] 
?kreis 
?setscrunch 2.5 
?kreis 


sf 


(screen facts) Liefert Informationen tiber den Graphik-Bildschirm. Sie erscheinen 
in der Reihenfolge: [Hintergrundfarbe’ -Bildschirm-Status. Fenster-Status. 
‘Seitenverhaltnis»] Fir «Hintergrundfarbe. erscheint die Nummer des fiir den 
Hintergrund verwendeten Zeichenstifts (bei CP/M 2.2 immer 0). Fir 
‘Bildschirm-Status» steht entweder SS _ (geteilter Bildschirm), FS 
(Graphik-Bildschirm) oder TS (Text-Bildschirm). :FenstergréBe- gibt die Anzahl 
der Text-Zeilen im Textfenster des Bildschirms an. Fur .Fenster-Status> wird der 
WINDOW-, WRAP- oder FENCE-Modus angegeben. Das ‘Seitenverhdltnis> ist 
immer 1, solange es nicht mit setsScrunch verandert wird. (Unter CP/M 2.2 
ist diese Moglichkeit nicht gegeben.) 


sf 
C@ SS 5 FENCE 2.5] 


(split screen) Richtet auf dem Graphik-Bildschirm ein Textfenster ein. 


?ss 


Einfihrung in LOGO Kapitel 6 Seite 25 


window 


Erlaubt der Schildkréte (nach einem wrap- oder f ence-Ausdruck) auferhalb 
des sichbaren Graphik-Bildschirms zu zeichnen. 


2fence fd 300 
Turtle out of bounds 
window 
fd 300 
wrap 


LaBt die Schildkréte auf der gegeniberliegenden Seite des Bildschirms 
auftauchen, wenn sie die Grenzen des Bildschirms tiberschreitet. 


?cs wrap 

rt 5 fd 18608 
?cs window 
?rt 5 fd 1068 


Schildkroten-Graphik 

bk 

(back) Bewegt die Schildkréte um die angegebene Anzahl Schritte riickwarts. 
2cs fd 158 
2bk 508 


fd 
(forward) Bewegt die Schildkréte um die angegebene Anzahl Schritte vorwarts. 
2fd 86 


* 


home 


Setzt die Schildkrote auf die Position (0/0) (Bildschirm-Mitte) mit Ausrichtung 
nach 0 (Nord). 


2fd 188 
rt 45 
2fd 108 
?home 
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ht 


(hide turtle) Macht die Schildkréte unsichtbar. Beschleunigt und verdeutlicht den 
Zeichenvorgang. 


ht 
2cs fd 58 
2st 


It 


(left) Dreht die Schildkréte um die angegebene Anzahl von Winkelgraden nach 
links. 


Ilt 98 


pd 


(pen down) Aktiviert den Zeichenstift (pen) der Schildkréte; die Schildkrote 
beginnt wieder zu zeichnen. 


2?fd 26 pu fd 26 
?pd 
2fd 26 


pe 


(pen erase) Verwandelt die Farbe des Zeichenstifts fiir die Schildkréte in die 
Farbe des Hintergrunds; die Schildkrite léscht gezeichnete Linien. 


?fd 56 
?pe 

2bk 25 
2fd 50 
pd fd 25 


pu 
(pen up) Deaktiviert den Zeichenstift (pen) der Schildkréte; die Schildkréte hort 
auf zu zeichnen. 


2fd 36 

2? pu 

2fd 36 
2?pd fd 308 
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px 


(pen exchange) Veranlafkt die Schildkréte, auf ihrem Weg die vorher gezeichneten 
Punkte in die Komplementarfarbe zu verwandeln. 


2fd 28 pu fd 28 
2nd setpc 3 fd 286 
2px 

?bk 80 


?fd 88 
?pd bk 108 


rt 


(right) Dreht die Schilkréte um die angegebene Anzahl von Winkelgraden nach 
rechts. 


rt 98 


seth 


(set heading) Dreht die Schildkréte in die absolute Richtung, die durch den 
angegebenen Winkelgrad festgelegt ist. Positive Werte drehen die Schildkréte in 
Uhrzeigerrichtung, negative Werte drehen sie entgegen der Uhrzeigerrichtung. 


2seth 9B 


setpc 


(set pen colour) Stattet die Schildkréte mit dem Zeichenstift aus, der der 
angegebenen Nummer zugeordnet ist. 


2setpc 1 


setpos 


(set position) Setzt die Schildkréte auf die Position, die durch die eingegebenen 
Koordinaten festgelegt wird. 


?setpos [38 26] 
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* 


setx 
Setzt die Schildkréte auf den angegebenen Punkt der x-Koordinate. 


?setx 88 
2fd 108 
?setx -58 
2fd 50 


* 
sety 
Setzt die Schildkréte auf den angegebenen Punkt der y-Koordinate. 


?sety 90 
2fd 20 
2sety -58 
2?fd 58 


st 
(show turtle) Macht die Schildkréte wieder sichtbar. 


Tht 
2¢d 5@ 
Ist 


tf 


(turtle facts) Liefert Informationen tiber die Schildkréte. Sie erscheinen in der 
Reihenfolge: {.xkor :ykor» -Richtung> .Pen-Status» Pen-Farbe: «sichtbar-] Mit 
«xkor> und :ykor: wird die x- bzw. y-Koordinate der Schildkréte angegeben. 
‘Richtung> gibt an, in welche Kompa&-Richtung die Schildkréte weist. Fur 
‘Zeichenstift-Status» kann PD (pen down), PE (pen erase), PX (pen exchange) oder 
PU (pen up) erscheinen. <Pen-Farbe> bezeichnet die Farbnummer des 
Zeichenstifts. Fur <sichtbar’ erscheint TRUE, wenn die Schildkréte sichtbar ist, 
ansonsten FALSE. 


?setpos [15 36] 

?rt 66 

?setpc 3 

?pe 

Tht 

tf 

C15 38 6@ PE 3 FALSE] 
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* 


towards 


Gibt die GréBe des Winkels an, um den die Schildkréte sich drehen mi®te, um 
auf den angegebenen Koordinatenpunkt zu weisen. 


?seth towards list :x ty 


Speicherplatz-Verwaltung 


er 


(erase) Léscht die angegebene(n) Prozedur(en) aus dem Arbeitsspeicher. 


2er "“quadrat 


* 


erall 


Léscht alle Prozeduren und Variablen aus dem Arbeitsspeicher. 


2erall 


ern 
(erase name) Léscht die angegebene(n) Variable(n) aus dem Arbeitsspeicher. 


?make “seite [108] 
Imake "“winkel [45] 
?:seite :winkel 
C160) 

[45] 

2ern Cseite winkel] 
?:seite 

seite has no value 


nodes 


Gibt die Anzahl der freien Knoten im Speicher an. 


?nodes 
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* 


noformat 


Léscht die Formatierung der Prozedur, einschlieBlich Kommentaren, aus dem 
Arbeitsspeicher, um mehr Knoten frei zu machen. 


?noformat 


* 


poall 
Zeigt die Definitionen aller Prozeduren und Variablen im Arbeitsspeicher an. 


2poall 


* 

pons 

Zeigt die Namen und Werte aller Global-Variablen im Arbeitsspeicher an. 
?pons 
medium is 48 


small is 28 
large is 88 


* 
pops 
Zeigt die Namen und Definitionen aller Prozeduren im Arbeitsspeicher an. 


?pops 


recycle 


Reorganisiert den Arbeitsspeicher und stellt soviele Knoten wie mdglich zur 
Verfiigung. 


?recycle 
nodes 
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Eigenschaftslisten 


glist 
(get list) Gibt eine Liste aller im Arbeitsbereich gespeicherten Ausdriicke aus, 


welche die eingegebene Eigenschaft in ihrer Eigenschaftliste enthalten. 


2glist ".DEF 


gprop 


(get property) Gibt den Eigenschaftswert des zum eingegebenen Objektnamen 
gehorenden Eigenschaftsnamens an. 


?make "hoehe "72 
?gprop "hoehe ".APV 
72 


plist 
(property list) Gibt die Eigenschaftsliste des eingegebenen Objekts aus. 


plist “hoehe 
(.APV 72) 


pprop 


(put property) Ubergibt der Eigenschaftsliste des genannten Objekts das 
eingegebene Eigenschaftspaar. 


2pprop “auto ".APV "farbe 
? tauto 
farbe 


* 


Pps 


Zeigt die vom Benutzer definierten Eigenschaftspaare aller Objekte im 
Arbeitsspeicher an. 


?pprop "Sally "Rufnummer 213 
?pps 

Sallys Rufnummer ist 213 
?plist “Sally 

CRufnummer 213] 
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remprop 


(remove property) Entfernt die genannte Eigenschaft aus der Eigenschaftsliste 
des eingegebenen Objekts. 


?remprop "auto ".APV 


Disketten-Dateien 


* 


changef 
(change file) Andert den Namen einer Datei im Disketten-Inhaltsverzeichnis. 


?dir 

CQUADRAT KREIS STERNE] 
?changef "viereck "quadrat 
dir 

CVIERECK KREIS STERNEJ 


* 


defaultd 
(default drive) Gibt an, welches Diskettenlaufwerk das Standardlaufwerk ist. 


?defaultd 

A: 
dir 
(directory) Gibt eine Liste mit den Dr.LOGO-Dateinamen der Standard-Diskette 
oder der angegebenen Diskette aus. Universalzeichen werden akzeptiert. 


2dir 3299999999 


(Uber den Gebrauch von Universalzeichen (? und *) finden Sie Naheres im 1. 
Teil des Kapitels ‘AMSDOS und CP/M’. Beachten Sie, daB das Universalzeichen * 
bei Dr. LOGO nicht verwendet werden kann.) 


Einfiihrung in LOGO Kapitel 6 Seite 33 


* 
dirpic 


Gibt eine Liste von Dateinamen fiir Bilder aus, die sich auf der Standard- oder 
auf der angegebenen Diskette befinden. Dateinamen mit Universalzeichen 
werden akzeptiert. 


?dirpic "b: 
CBILD_ELF QUADRATE STERNE NOTIZEN] 


load 


Liest die angegebene Datei von der Diskette in den Arbeitsspeicher. 


2load "sterne 
2?load "b:formen 


loadpic 


Ruft das Muster, das in der eingegebenen Bild-Datei gespeichert wurde, auf den 
Graphik-Bildschirm. 


2loadpic "bild_elf 
2loadpic "b:bild_elf 


save 


Schreibt den Inhalt des Arbeitsspeichers unter dem angegebenen Dateinamen auf 
die Diskette. 


2save "formen 


HINWEIS: Bevor Sie etwas abspeichern, schieben Sie eine formatierte Diskette 
mit gentigend freiem Speicherplatz ins Laufwerk. Speichern Sie keine Dateien auf 
Ihre Systemdisketten. Um jedes Risiko zu vermeiden, da8 auf die 
Systemdisketten geschrieben wird,  schlieBen Sie NIEMALS die 
Schreibschutzlocher Ihrer Systemdisketten! 


Wenn Sie mit der CP/M 2.2-Version von Dr.LOGO (auf Seite 4 der 
Systemdisketten) arbeiten, kénnen Sie die ODisketten wahrend des 
Speichervorgangs nicht wechseln. Es ist deshalb sehr wichtig, da8 auf Ihrer CP/M 
2.2-Arbeitsdiskette mit Dr.LOGO gentigend Platz fiir Programme ist. 
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* 


savepic 


Schreibt den Inhalt des Graphik-Bildschirms unter dem angegebenen Namen in 
die Bild-Datei. 


?savepic “bild_elf 
2savepic "b:bild_elf 


HINWEIS: Bevor Sie etwas abspeichern, schieben Sie eine formatierte Diskette 
mit geniigend freiem Speicherplatz ins Laufwerk. Speichern Sie keine Dateien auf 
Ihre Systemdisketten. Um jedes Risiko zu vermeiden, da auf die 
Systemdisketten  geschrieben wird,  schlieBen Sie NIEMALS = die 
Schreibschutzloécher Ihrer Systemdisketten! 


Wenn Sie mit der CP/M 2.2-Version von Dr.LOGO (‘auf Seite 4 der 
Systemdisketten) arbeiten, kénnen Sie die Disketten wdahrend des 
Speichervorgangs nicht wechseln. Es ist deshalb sehr wichtig, dai auf Ihrer CP/M 
2.2-Arbeitsdiskette mit Dr. LOGO gentigend Platz fiir Programme ist. 


* 


setd 


(set drive) Macht das angegebene Laufwerk zum Standardlaufwerk. 


?%defaultd 

A: 

?dir 

CVIERECKE KREISE STERNEJ 
?setd "b: 

defaultd 

B: 

?dir 


CDREIECK HAUS] 
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Tastatur und Joystick 


buttonp 


(button pressed) Gibt TRUE aus, wenn der Knopf des angegebenen Joysticks 
gedriickt ist. Den beiden méglichen Joysticks sind die Nummern 0 und 1 
zugeordnet. 


2to feuer 

>label "schleife 

>if (button 86) Cpr Cfeuer Q!)] 
>if (button 1) Cpr Cfeuer 1!]] 
>go "schleife 

>end 


Die Position des Joysticks wird durch paddle ermittelt. 


keyp 


(key pressed) Gibt TRUE aus, wenn eine Taste der Tastatur gedriickt wurde und 
darauf wartet, eingegeben zu werden. 


?to eintaste 
>if keyp Cop rcj Lop "] 
>end 


paddle 


Gibt den Zustand von Joystick 0 oder 1 an. Die Positionen des Joysticks werden 
wie folgt angezeigt: 


Angezeigter Wert Bedeutung 


255 nichts gedriickt 
aufwarts 

aufwarts und rechts 
rechts 

abwarts und rechts 
abwarts 

abwarts und links 
links 

aufwarts und links 


AOR WNH © 


paddle @ 
255 


Der Zustand der Feuer-Knépfe wird mit but tonp ermittelt. 
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rc 

(read character) Gibt das erste Zeichen an, das auf der Tastatur gedriickt wurde. 
make "taste rc 

Driicken Sie nun die X-Taste. 


?:taste 


rl 


(read list) Gibt eine Liste aus, welche die tiber die Tastatur eingegebene Zeile 
enthalt. Der Eingabe muB ein Zeilenriicksprung folgen. 


?make "“bef_liste rl 
repeat 4 Cfd 58 rt 98] 
?:bef_liste 

Crepeat 4 Cfd 58 rt 99)] 


rq 


(read quote) Gibt ein Wort aus, das die tiber die Tastatur eingegebene Zeile 
enthalt. Der Eingabe muB ein Zeilenriicksprung folgen. 


make “befehl rq 
repeat 3 ECfd 6@ rt 120] 


?:befehl 
repeat 3 Cfd 68 rt 1286] 


Sound-Befehle 


Die Sound-Befehle gibt es nur in der Schneider-Version von Dr.LOGO. Sie ahneln 
den Sound-Befehlen in Schneider-BASIC. 


sound 


Ubergibt einen Ton an die Ton-Warteschlange. Das Format ist: |Kanalstatus> 
‘Tonperiode’ «Dauer -<Lautstarke <Lautstarken-Hullkurve. .Ton-Hiillkurve 
«Gerausche: |. Die vier Parameter nach ‘Dauer: sind Wahl-Parameter. 


2sound £1 28 58] 
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env 


Definiert eine Lautstarken-Hullkurve. Das Format ist: [«Hiillkurven-Nummer> 
«Hillkurven-Abschnitt(e)> ] 


2env £€1 100 2 26) 
2sound C1 206 3008 5 1] 


ent 


Definiert eine Ton-Hillkurve. Das Format ist: [«Hillkurven-Nummer 
«Htillkurven-Abschnitt(e)> ] 


2ent £1 108 2 20] 
2sound C 1 206 3005 1 1] 


release 


Gibt einen Ton-Kanal frei, der durch den sound-Befehl gesperrt wurde. Die 
freizugebenden Kandle werden folgendermafen gekennzeichnet: 


Eingegebener Wert Freigegebener Kanal 


keiner 

A 

B 

AundB 

C 

A und C 

B und C 
A, B und C 


AOR WNH © 


?release 1 


Ablauf-Steuerung 


bye 
Beendet die Bearbeitung unter Dr.LOGO. 


?bye 
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co 


Beendet eine durch [CONTROL]Z, pause oder ERRACT  verursachte 
Unterbrechungspause. 


2c¢0 


go 


Fuhrt die Zeile innerhalb der momentanen Prozedur aus, deren Marke (label) 
dem eingegebenen Wort entspricht. 


>go "schleife 
if 
Fihrt je nach dem Wert des eingegebenen Ausdrucks eine von zwei moglichen 
Befehls-Listen aus. Die eingegebenen Anweisungen miissen Direkt-Befehlslisten 


sein und in Klammern stehen. 


>if C€a>b) ECpr La ist groesser]] 
>Epr Cb ist groesser]] 


label 
Kennzeichnet die Zeile, die nach dem go-Befehl ausgefiihrt werden soll. 


>label "schleife 


op 


(output) Beendet die Ausfithrung der Prozedur und gibt die Eingabe als Wert 
zuriick. 


20p Cergebnis] 


repeat 
Fihrt die angegebene Befehls-Liste sooft aus, wie die Zah] angibt. 
2repeat 4 Cfd 5@ rt 96] 
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run 
Fuhrt die eingegebene Befehls-Liste aus. 


9make "befehls_liste CFfd 40 rt 98] 
?run s:befehls_liste 


stop 


Bricht die Durchfiithrung der Prozedur ab und kehrt zu TOPLEVEL (mit dem 
Prompt ? ) oder der aufrufenden Prozedur zuriick. 


stop 
wait 


Unterbricht die Durchfithrung der Prozedur fir eine bestimmte Zeit. 
Unterbrechungszeit = Eingabewert * 1/60 Sekunden. 


wait 200 


Ausnahmefalle 


catch 


Erkennt Fehler und besondere Umstande, die wahrend der Ausfiihrung der 
eingegebenen Befehls-Liste auftreten. 


>catch “error C+ C] CI] 
>pr CHier bin ich] 
Hier bin ich 


error 


Gibt eine Liste aus, deren Elemente den zuletzt aufgetretenen Fehler 
beschreiben. 


>catch "error [ECdo.until.error] 
>show error 
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* 


notrace 


Schaltet die Méglichkeit, die Prozedur wahrend ihrer Durchfihrung zu verfolgen, 
ab. (vergl. trace) 


2notrace 


* 


nowatch 


Schaltet die Méglichkeit, alle oder die angegebenen Prozedur(en) wahrend ihrer 
Ausfiihrung zu tberprifen, ab. (vergl. watch) 


?nowatch 


pause 


Unterbricht die Ausfiihrung der Prozedur, um den Aufruf des Interpreters oder 
Editors zu erméglichen. 


>if :groesse>5 [pause] 


throw 


Fihrt die Zeile aus, die durch den eingegebenen Namen im vorangegangenen 
catch-Ausdruck gekennzeichnet ist. 


?throw “TOPLEVEL 


* 
trace 


Erméglicht es, eine Prozedur wahrend ihrer Durchfiihrung zu verfoigen. 


trace 


* 


watch 


Erméglicht die Uberpriifung aller oder der angegebenen Prozedur(en) wahrend 
ihrer Durchfthrung. 


watch 
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System-Primitive 
.contents 


Zeigt den Inhalt des Dr.LOGO Symbol-Speichers. 


deposit 


Legt den zweiten Eingabewert unter der absoluten Speicheradresse, die durch den 
ersten Eingabewert bestimmt wurde, ab. 


examine 
Gibt den Inhalt der angegebenen absoluten Speicheradresse aus. 


* 
.in 


Ruft den momentanen Wert vom Port mit der eingegebenen Nummer ab. 


* 


out 


Schickt den eingegebenen Wert zum Port mit der angegebenen Nummer. 
System-Variablen 


ERRACT 


Ist ERRACT TRUE, bewirkt sie beim Auftreten eines Fehlers eine Pause und 
kehrt daraufhin nach TOPLEVEL zurick. 


FALSE 
System-Wert 
REDEFP 


Ist REDEFP TRUE, konnen Primitive neu definiert werden. 
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TOPLEVEL 


throw "TOPLEVEL beendet alle momentan bearbeiteten Prozeduren. 


TRUE 


System-Wert 


System-Eigenschaften 
.APV 


(Associated Property Value) Wert einer Global-Variablen 


.DEF 
Definition einer Prozedur 


-ENL 


Ende einer Prozedur-Zeile, die durch einen Zeilenricksprung oder Leerstellen 
unterbrochen ist. 


EMT 


Beginn einer Prozedur-Zeile, die durch einen Zeilenricksprung oder Leerstellen 
unterbrochen ist. 


PRM 


Kennzeichnet eine Primitive 


REM (or;) 


(remarks) Bemerkungen, Kommentare 
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Kapitel 7 
Ubersicht 


Dieses Kapitel ist das ‘Nachschlagewerk’. Sie finden hier eine 
Vielzahl von Informationen, die Sie brauchen, wahrend Sie 
sich mit diesem Computer vertraut machen. 


Behandelte Themen: 


Cursorpositionen und Steuer-Codes 
Unterbrechungsfunktionen 
ASCII-Zeichensatz und graphische Zeichen 
Tastenbezeichnungen 

Noten und Tonperioden 
Fehlermeldungen 
BASIC-Schlusselworter 

Entwurfsgitter 

Anschliisse 

Drucker 

Joysticks 

Disketten-Organisation 

Eingebaute System-Erweiterungen (RSX) 
Speicher 

CP/M Plus Bildschirmanpassung 

CP/M Plus Zeichensatz 


Umfassende Informationen iiber BASIC und Firmware fiir den CPC6128 finden 
Sie in den Schneider Handbiichern SW 967 bzw. SW 968. 


tt 


2 >t > >t >t >t > >t >t >t > >t ot Ot 


Teil 1: 
BASIC Cursor-Positionen und Steuer-Codes 


In zahlreichen Anwender-Programmen liegt der Cursor auferhalb des 
Bildschirmbereiches (window). Um ihn vor Ausfiihrung des Programms in eine 
erlaubte Position zu riicken, stehen folgende Operationen zur Verfiigung: 
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1. Ein Zeichen schreiben 
2. Den Cursor auf den Bildschirm bringen 


3. Den Steuer-Codes folgen, die in der BASIC-Steuerzeichen-Liste mit einem 
Sternchen versehen sind. 


Je nach seiner Position auBerhalb des Fensters erscheint der Cursor dann an 
unterschiedlichen Stellen innerhalb des Fensters: 


1. Befindet sich der Cursor rechts vom rechten Fenster-Rand, riickt er auf die 
nachste Zeile in die Spalte ganz links. 


2.  Befindet sich der Cursor links vom linken Fenster-Rand, riickt er auf die 
vorige Zeile in die Spalte ganz rechts. 


3.  Befindet sich der Cursor tber dem oberen Rand des Fensters, wird das 
Fenster um eine Zeile nach unten gerollt und der Cursor in die oberste Zeile 
des Fensters gesetzt. 


4.  Befindet sich der Cursor unterhalb des unteren Fenster-Randes, wird das 
Fenster um eine Zeile nach oben gerollt und der Cursor in die unterste Zeile 
des Fensters gesetzt. 


Die Tests und Operationen werden in der genannten Reihenfolge durchgefihrt. 
Die unerlaubten Cursor-Positionen kénnen Null oder negativ sein, d.h. links oder 
oberhalb des Fensters. 


Werden Zeichenwerte zwischen 0 und 31 auf den Text-Bildschirm ausgegeben, so 
werden sie nicht angezeigt, sondern als Steuer-Codes interpretiert. Sie sollten 
daher nicht leichtfertig eingegeben werden. Einige Codes andern die Bedeutung 
eines oder mehererer der folgenden Zeichen, die die Parameter des Codes 
darstellen. 


Ein Steuer-Code, der tber die Tastatur eingegeben und zum Graphik-Bildschirm 
geschickt wird, erscheint lediglich als tibliches, seiner Funktion entsprechendes 
Symbol (z.B. &07 ‘BEL’-[CONTROL] G). Er wird seine Funktion ausfiihren, wenn 
er mit einem Befehl angesprochen wird: 


PRINT CHR$(&@7) oder PRINT " S® " (wobei far S® in der 
PRINT-Anweisung [CONTROLJG gedriickt wird). 
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Die mit einem Sternchen * versehenen Codes bringen den Cursor in eine erlaubte 
Position innerhalb des Fensters, bevor sie ausgefiihrt werden. Dabei kann der 
Cursor in einer unerlaubten Position belassen werden. Fiir die Codes und ihre 
Bedeutungen werden erst ihre HEX-Werte (&XX) und dann die entsprechenden 
Dezimalwerte angegeben. 


BASIC Steuer-Codes 


Name Parameter Bedeutung 


NUL Kein Einflu8. Wird ignoriert. 


SOH 0 bis 255 Gibt das zum Parameter-Wert 
gehorende Symbol aus. Symbole im 
Bereich 0 bis 31 werden angezeigt. 


Schaltet den Text-Cursor ab. 
Entspricht dem CURSOR-Befehl mit 
dem Parameter-Wert 0 fiir 
<Benutzerschalter>. 


Schaltet den Text-Cursor an. 
Entspricht dem CURSOR-Befehl mit 
dem Parameter-Wert 1 fiir 
<Benutzerschalter. Hinweis: Um den 
Cursor innerhalb eines 
BASIC-Programms auf den 
Bildschirm zu holen (im Gegensatz 
zum Direkt-Modus, wo der Cursor 
automatisch erscheint), mu8 der 
CURSOR-Befehl mit dem 
<Benutzerschalter:-Parameter 1 
verwendet werden. 


&04 4 EOT Setzt den Bildschirm-Modus. 
Parameter ist MOD 4. Entspricht dem 
MODE-Befehl. 


&05 5 ENQ 0 bis 255 Sendet das Parameter-Zeichen zum 
Graphik-Cursor. 
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Name Parameter Bedeutung 


ACK Schaltet auf Text-Bildschirm um. 
(Vergl. &15 NAK.) 


BEL Pieps-Ton. Léscht die 
Ton-Warteschlangen. 


* BS Setzt Cursor um eine Stelle zuriick. 
Bewegt Cursor eine Stelle vorwarts. 
Bewegt Cursor eine Zeile abwarts. 
Bewegt Cursor eine Zeile aufwarts. 


Léscht das Text-Fenster und setzt 
Cursor in die obere linke Ecke. 
Entspricht dem Befehl CLS. 


Setzt Cursor an den linken Rand des 
Text-Fensters auf derselben Zeile. 


0 bis 15 Bestimmt den Farbstift fir den 
Schrift-Untergrund. Parameter ist 
MOD 16. Entspricht dem Befehl 
PAPER. 


SI 0 bis 15 Bestimmt den Farbstift fiir die 
Schrift. Parameter ist MOD 16. 
Entspricht dem Befehl PEN. 


&1016 * DLE Léscht den Buchstaben unter dem 
Cursor. Fillt die Buchstabenzelle mit 
dem PAPER-Farbstift. 


&1117 * DCl Léscht alles in der Zeile vom linken 
Rand des Fensters bis zur 
Cursor-Position einschlieBlich. Fullt 
die betreffenden Buchstabenzellen mit 
dem PAPER-Farbstift. 
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Wert Name Parameter Bedeutung 


&1218 * DC2 Léscht alles in der Zeile von der 
Cursor-Position einschlieBlich bis zum 
rechten Rand des Fensters. Fillt die 
betreffenden Buchstabenzellen mit 
dem PAPER-Farbstift. 


&1319 * DC3 Léscht alles vom Beginn des Fensters 
bis zur Cursor-Position einschlieBlich. 
Fullt die betreffenden 
Buchstabenzellen mit dem 
PAPER-Farbstift. 


&1420 * DC4 Léscht alles von der Cursor-Position 
einschlieBlich bis zum Ende des 
Fensters. Fiillt die betreffenden 
Buchstabenzellen mit dem 
PAPER-Farbstift. 


Schaltet den Text-Bildschirm ab. Der 
Bildschirm reagiert auf keine 
Eingaben, bis er mit ACK (&06 6) 
wieder in Betrieb genommen wird. 


Parameter MOD 2. 
Transparent-Modus, mit 0 
eingeschaltet, mit 1 ausgeschaltet. 


Parameter MOD 4. 

0 setzt normalen Graphik-Ink-Modus 
1 setzt Graphik-Ink-Modus nach XOR 
2 setzt Graphik-Ink-Modus nach AND 
3 setzt Graphik-Ink-Modus nach OR. 


Tauscht Farbstifte von Pen und Paper 
aus. 
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Name Parameter Bedeutung 


EM 0 bis 255 Setzt Matrix fiir Benutzer-definiertes 
0 bis 255 Zeichen. Entspricht dem Befehl 
0 bis 255 SYMBOL. Hat 9 Parameter. Der 
0 bis 255 erste Parameter gibt an, welches 
0 bis 255 Zeichen umdefiniert werden soll, die 
0 bis 255 anderen acht definieren die Matrix. 
0 bis 255 Das Bit mit der héchsten Signifikanz 
0 bis 255 aus dem ersten Byte entspricht dem 
0 bis 255 Bildpunkt links oben in 
der Buchstabenzelle, das Bit mit der 
niedrigsten Signifikanz aus dem 
letzten Byte entspricht dem 
Bildpunkt unten rechts in der 
Buchstabenzelle. 


Definiert ein Fenster (window). 
Entspricht dem WINDOW-Befehl. Die 
beiden ersten Parameter bestimmen 
die rechte (groRerer Wert) und linke 
(kleinerer Wert) Begrenzung des 
Fensters, die nachsten beiden 
Parameter bestimmen die obere 
(kleinerer Wert) und die untere 
(gréBerer Wert) Begrenzung. 


Kein Einflu8. Wird ignoriert. 


0 bis 15 Legt Farbenpaar fiir Farbstift fest. 

0 bis 31 Entspricht dem Befeh! INK. Der erste 

0 bis 31 Parameter (MOD 16) nennt den 
Farbstift, die nachsten beiden 
Parameter (MOD 32) bestimmen die 
Farben. (Die Parameter-Werte 27 bis 
31 stehen fiir undefinierte Farben.) 
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Name Parameter Bedeutung 


GS 0 bis 31 Bestimmt Farbenpaar fiir den Rand. 
0 bis 31 Entspricht dem Befehl BORDER. Die 
beiden Parameter (MOD 32) 
bestimmen die beiden Farben. (Die 
Parameter-Werte 27 bis 31 stehen fiir 
undefinierte Farben. 


Setzt Cursor in die linke obere Ecke 
des Fensters. 


1 bis 80 Setzt Cursor auf die angegebene 

1 bis 25 Position innerhalb des Fensters. 
Entspricht dem Befehl LOCATE. Der 
erste Parameter definiert die Spalte, 
der zweite die Zeile. 


Die Steuerung des CPC6128 wird von einem komplizierten 
Echtzeit-Betriebssystem tbernommen. Das Betriebssystem steuert den 
‘Verkehrsflu’ durch den Computer, von der Eingabe bis zu Ausgabe. 


Es stellt in erster Linie das Bindeglied zwischen der Hardware und dem 
BASIC-Interpreter dar. Bei der Funktion der wechselnden Ink-Farben z.B. 
ubergibt BASIC die Parameter, und das Betriebssystem tbernimmt die 
Weiterbehandlung: Ein Teil analysiert, was zu tun ist, der andere tiberwacht den 
zeitlichen Ablauf. 


Das Betriebssystem eines Computers wird allgemein als ‘Firmware’ bezeichnet. 
Es besteht aus Maschinencode-Routinen, die BASIC mit seinen Kommandos 
aufruft. 


Falls Sie versuchen méchten, mit POKE-Befehlen die internen Speicherinhalte zu 
verdndern oder mit CALL die Systemroutinen aufzurufen, sichern Sie vorher ihr 
Programm, da es zerstért werden kénnte. Eine ausfiihrliche Beschreibung der 
Betriebssystem-Firmware des CPC6128 steht in einem zusatzlichen Handbuch, 
das weit tiber den Umfang dieser Einfithrung hinausgeht. 
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Teil 2: 
Unterbrechungsfunktionen 


Der CPC6128 nutzt die Unterbrechungsmiglichkeiten des Z80 in hohem Make 
aus, so da das Betriebssystem Multi-Tasking-Funktionen (mehrere Anweisungen 
werden gleichzeitig bearbeitet) austiben kann. Ein Beispiel dafir sind die 
AFTER- und EVERY-Kommandos, die in Kapitel 8 beschrieben sind. Die 
Unterbrechungen haben folgende Prioritatenfolge: 


Break ({ESC][ESC]) 

Zeitgeber 3 

Zeitgeber 2 (und die drei Ton-Warteschlangen) 
Zeitgeber 1 

Zeitgeber 0 


Unterbrechungen sollten nicht eingebaut werden, ohne die méglichen Zustande 
der verschiedenen Variablen zum Zeitpunkt der Unterbrechung zu durchdenken. 
Das Unterbrechungs-Unterprogramm sollte ungewollte Verdnderungen der 
Variablen im Hauptprogramm vermeiden. 


Die Ton-Warteschlangen haben unabhangige Unterbrechungen mit gleicher 
Prioritat. Sobald eine solche Unterbrechung eingetreten ist, wird sie von keiner 
anderen nochmals unterbrochen. Fir Sound-Unterbrechungs-Unterprogramme 
kénnen deshalb anders als bei Zeitunterbrechungen die gleichen Variablen 
benutzt werden. 


Wenn eine Ton-Warteschlangen-Unterbrechung mit dem Befehl ON SQ GOSUB 
in Kraft gesetzt ist, so tritt sofort eine Unterbrechung ein, wenn die 
Ton-Warteschlange fiir diesen Kanal nicht voll ist. Ansonsten tritt eine 
Unterbrechung nur ein, sobald der nachste Ton gestartet wurde und wieder Platz 
in der Warteschlange vorhanden ist. Durch den Unterbrechungsvorgang werden 
weitere Unterbrechungen auer Kraft gesetzt, weshalb das 
Unterbrechungs-Unterprogramm eine Unterbrechungsméglichkeit fir weitere 
Falle bereitstellen muf. 


Wird ein Ton ausgelést oder der Zustand der Warteschlange getestet, ist die 
Unterbrechungsfunktion ebenfalls au8er Kraft gesetzt. 
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Teil 3: ASCII-Zeichensatz und 
graphische Zeichen 


ASCII 


In dieser Tabelle ist der Standard-ASCII-Zeichensatz mit dezimaler, oktaler und 
hexadezimaler Schreibweise zusammen mit den zugehorigen ASCII-Codes 
aufgefithrt. Die folgenden Seiten zeigen alle CPC6128-Zeichen im Detail. 


DEZ OKTAL HEX ASCII Zeichen DEZ OKTAL HEX DEZ OKTAL HEX ASCII 


000 00 NUL ({CTRL]a) 062 100 144 
001 01  SOH ({CTRLJA) 063 101 145 
002 02 = STX({CTRL]B) 064 102 146 
003 03 ETX([CTRLJC) 065 103 147 
004 04 EOT({CTRLID) 066 104 150 
005 «05 =~ ENQ({CTRLJE) 067 105 151 
006 06 ACK ((CTRLIF) 070 106 152 
007 07 ~—BEL ((CTRLjG) 071 107 153 
010 08 BS ({CTRLIH) 072 108 154 
011 09 ~=HT (CTRL!) 073 108 155 
012 OA LF ({CTRL]J) 074 110 156 
013° «=OB VT ({CTRL]K) 075 111 157 
014. =OC FF((CTRLIL) 076 112 160 
015 OD CR{{CTRL]M) 077 113 161 
016 OE SO({(CTALIN) 100 114 162 
017 OF SI {CTRLJO) 101 115 163 
020 10  DLE{(CTRLIP) 102 116 164 
021 11 DC1 ({CTRLIJQ) 103 117 165 
022 #12 OC2({CTRLIR) 104 118 166 
023. «13 + +=DC3({CTRLIS) 105 119 167 
024 «14 ~=DC4CTRLIT) 106 120 170 
025 15 NAK ((CTRLJU) 107 121 171 
026 «616 ~=«6SYN ((CTRLY) 110 122 172 
027. «17 ETB ({CTRLIW) 1 123 173 
030 18 CAN ((CTRLJX) 112 124 174 
031 19 EM(CTRLIY) 113 125 175 
032 1A SUB ({CTRL]Z) 114 126 176 
033 1B 115 
034 1c 116 
035 1D 117 
036 1E 120 
037 121 
040 122 
041 1 123 
042 124 
043 125 
044 126 
045 127 
046 130 
047 131 
050 132 
051 133 
052 134 
053 135 
054 136 
055 137 
056 . 140 
057 141 
060 142 
061 143 


WOMNMNhWN-O 
OONAULEW 


~ANM xX Eccear*n wn OAvO DBs Hees TA HOA 


; 
< 
> 
? 
@ 
A 
B 
Cc 
D 
E 
F 
G 
H 
I 
J 
K 
L 
M 
N 
0 
Pp 
Q 
R 
Ss 
T 
U 
V 
Ww 
x 
Y 
Zz 
C 
\ 
I 


ow 
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Maschinenspezifischer BASIC-Graphik-Zeichensatz 


Die hier abgebildeten Zeichen sind in einer 8x8 Matrix 
dargestellt, wie sie auf dem CPC6128-Bildschirm 
erscheinen. Benutzer-definierte Zeichen k6énnen fir 
spezielle Effekte zusammengestellt werden und biindig 
aneinander stoBen - siehe ‘Benutzer-definierte Zeichen’ 
im 9. Kapitel. 


&H23 

&X00100001 &X00100011 
a 
37 38 
&H25 &H26 &H27 
&X00100101 &X00100110 &X00100111 

a 

| 
41 
&H29 
&X00101001 


47 
&H2D &H2E &H2F 
&X00101101 &X00101110 &X00101111 
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32 &H20 


&H24 
&X00100100 


40 
&H28 
&X00101000 


&H2C 
&X00101100 


&H30 
&X001 10000 


Ubersicht 


| 

49 50 51 52 
&H31 &H32 &H33 &H34 
&X00110001 &X00110010 &X00110011 &X00110100 

| 

a 

a 

53 54 55 
&H35 &H36 &H37 &H38 
&X00110101 &X00110110 &X00110111 &X00111000 


57 60 
&H39 &H3A &H3B &H3C 
&X00111001 &X00111010 &X00111011 &X00111100 
a 
62 63 

&H3D &H3E &H3F &H40 
&X00111101 &X00111110 &X00111111 &X01000000 

cra Pa 

_ a 

ot on 

a a 

a 
65 66 67 
&H41 &H42 &H43 &H44 
&X01000001 &X01000010 &X01000011 &X01000100 
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&H45 
&X01000101 


_ &H49 
&X01001001 


&H4D 
&X01001101 


81 
&H51 
&X01010001 


i 


&H55 
&X0101010% 
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&H46 
&X01000110 


&X01001010 


&H4E 
&X01001110 


&H52 
&X01010010 


&H56 
&X01010110 


71 
&H47 
&X01000111 


75 
&H4B 
&X01001011 


79 
&H4F 
&X01001111 

a 

a 

83 
&H53 
&X01010011 
a a 
a a 
| a 
a a 
a an 
a a 
87 
&H57 
&X01010111 


&H48 


&H4C 
&X01001106 


&H50 
&X01010000 


&H54 
&X01010100 


88 
&H5S8 
&X01011000 


Ubersicht 


&H59 
&X01011001 


93 
&H5D 
&X01011101 


anaes 


97 
&H61 
&X01100001 


101 
&H65 
&X01100101 


&H69 
&X01101001 


Ubersicht 


90 
&HS5A 
&X01011010 


91 
&H5B 
&X01011011 


&H5E 
&X01011110 


98 
&H62 
&X01100010 


102 
&H66 
&X01100110 


&H6A 
&X01101010 


&HSF 


&H60 
&X01100000 


103 
&H67 
&X01100111 


107 
&H6B 
&X01101011 


100 
&H64 
&X01100100 


&H68 
&X01101000 


108 
&H6C 
&X01101100 
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109 110 
&H6D &H6E 
&X01101101 &X01101110 


113 
&H71 
&X01110001 


&H75 &H76 


121 
&H79 &H7A 
&X01111001 &X01111010 
@ 
& 
BEER 
a Bann 
SEenneee 
BEEeasee 
SRESREE8 
125 126 
&H7D &H7E 
&X01111101 &X01111110 
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&HEF 


115 
&H73 
&X01110011 


119 
&H77 
&X01110111 


123 
&H7B 
&X01111011 


aan 


127 
&H7F 
&X01111111 


&H70 


116 
&H74 
&X01110100 


an a 
Sueeeeen 
120 


&H78 
&X01111000 


124 
&H7C 
&X01111100 


Sauesese 
128 


&H80 
&X10000000 


Ubersicht 


129 131 
&H81 &H83 
&X10000001 &X10000011 


&H86 &H87 


138 139 
&H8A &H8B 
&X10001010 &X10001011 


&H8D &H8E &H8F 
&X10001111 


147 
&H91 &H92 &H93 
&X10010001 &X10010010 &X10010011 
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&H88 


140 
&H8C 
&X10001100 


&H90 


&H94 
&X10010100 
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an _ an 
a8 ann 
as San 
am o8a 
oem 888 
it) ae 
as Bun 
an ane 
149 

&H95 
&X10010101 


153 
&H99 
&X10011001 


157 
&H9D 
&X10011101 


&HA1 


165 
&HAS 
&X10100101 
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&H9A 


&H9E 


162 


&HA6 
&X10100110 


151 
&H97 
&X10010111 


&HSB 
&X10011011 


159 
&HOF 
&X10011111 


fs 


163 
&HA3 
&X10100011 


&X10100111 


&X10011100 


160 
&HAO 
&X10100000 


&HA8 
&X10101000 
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an a 
sanneees 
169 


&HAY 
&X10101001 


177 
&HB1 
&X10110001 


181 
&HB5 
&X10110101 


&X10111001 


Ubersicht 


170 
&HAA 
&X10101010 


&HAE 


&HB2 
&X10110010 


ie 


182 
&HB6 
&X10110110 


ane 


186 
&HBA 
&X10111010 


171 
&HAB 
&X10101011 


172 
&HAC 
&X10101100 


175 
&HAF 


176 


&HBO 
&X10110000 


179 
&HB3 
&X10110011 


183 
&HB7 
&X10110111 


187 
&HBB 
&X10111011 


180 
&HB4 
&X10110100 


184 
&HB8 
&X10111000 


ie 


188 
&HBC 
&X10111100 
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189 
&HBD 
&X10111101 


&HC1 
&X11000001 
a 
| 
197 
&HC5 
&X11000101 
| 
201 
&HC9 
&X11001001 
|] 
a 
205 
&HCD 
&X11001101 
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190 
&HBE 
&X10111110 


194 
&HC2 


202 
&HCA 
&X11001010 


&HCE 
&X11001110 


&HBF 


&X11000011 


a 


199 
&HC7 
&X11000111 


203 
&HCB 
&X11001011 


ti 


207 
&HCF 
&X11001111 


192 
&HCO 
&X11000000 


196 
&HC4 
&X11000100 


&HC8 
&X11001000 


204 
&HCC 
&X11001100 


&HDO 
&X11010000 


Ubersicht 


209 
&HD1 
&X11010001 


213 
&HD5 


&X11011001 


221 
&HDD 
&X11011101 


&HE1 
&X11100001 


Ubersicht 


&HD2 


&X11010110 


a 


218 
&HDA 
&X11011010 


222 
&HDE 
&X11011110 


&HE2 
&X11100010 


&HD7 
&X11010111 


aM 


219 
&HDB 
&X11011011 


223 
&HDF 


227 
&HE3 
&X11100011 


&HD4 
&X11010100 


216 
&HD8 
&X11011000 


220 
&HDC 
&X11011100 


&HEO 


228 
&HE4 
&X11100100 
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229 
&HE5 
&X11100101 


237 
&HED 
&X11101101 


&HF 1 


245 
&HFS 
&X11110101 
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234 
&HEA 
&X11101010 


242 
&HF2 


246 
&HF6 
&X11110110 


231 
&HE7 
&X11100111 


235 
&HEB 
&X11101011 


232 
&HE8 
&X11101000 


239 
&HEF 
&X11101111 


243 
&HF3 
&X11110011 


247 
&HF7 
&X11110111 


240 
&HFO 
&X11110000 


Seeeeeen 
244 

&HF4 
&X11110100 


248 
&HF8 
&X11111000 


Ubersicht 


249 250 251 
&HF9 &HFA &HFB &HFC 
&X11111001 &X11111010 &X11111011 &X11111100 


253 254 255 
&HFD &HFE &HFF 
&X11111101 &X11111110 &X14111111 
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Teil 4: Tastenbezeichnungen 
Standard-ASCII-Werte (HEX) 


LOL 
1F iE | 19 | Ze 
N/A 2 2 24 | 25 || 26 27 29 | 5F |} 3D || A 10 || 7F || NAINA |N/A 
a 39 || 30 || 2D || SE || 10 || 7F 
7 1) ra OF jf 10 }{ 00 |f 18 
49 4aF 50 7C 78 NWA || N/A wi 
HI 28 6F || 70 || 40 || 5B oD 
oD 
oD 


ret 
om Te 


ag 
33 44 ae 
73_}| 64 || 66 
18 || 03 
58 8 


is ee 


— 


JOYSTICK C 


N/A Ej Fa || wa 
FO 


9 N/A 
FA FB 
jlo |B 
JOYSTICK 1 


FEUER2 


FEUER) 
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Ubersicht 


Erweiterungszeichen, 
Standardpositionen und Werte 


FOWL LA LOLA LALLA AL PLLA AANA NA APL AA A ATLT. 


} f 7 x 
N/A [wa Na | N/A [Nia N/A wa wa wa N/A [ia fm | 


Nia, 


wa [wa] EL 


an onan neva ea] 


| : 
wm [one 


N/A ina N/A 


| N/A | N/A | N/A [Na 


| N/A | N/A | NA N/A | N/A | N/A | 


; eee 


aon 


eles] = fT 


N/A N/A 48 
B9 


0 (128) a &30 
1 (129) 1 &31 
2 (130) 2 &32 
3 (131) 3 &33 
4 (132) 4 &34 
5 (133) 5 &35 
6 (134) 6 &36 
7 (135) 7 &37 
8 (136) 8 &38 
9 (137) 9 &39 
10 (138) ° 
11 (139) [RETURN] 
12 (140) RUN" [RETURN] | &52 &55 &4E &22 &0D 
Anmerkung: Erweiterungszeichen 13 bis 31 (141 bis 159) 
haben standardmafig einen Nullwert. Sie erhalten durch 


das BASIC-Kommando KEY einen Wert und werden 
durch das Kommando KEY DEF einer Taste zugeordnet. 


lina Nia N/A 


Ubersicht 
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Nummernzuordnuyg zu 
Tasten und Joystick-Signalen 


TLL PAAR NAPA RAP AANA NPN ANN RNS EAA NTT 


[ 66 [64] es] 57 | 66 | 49 IE | a | 40 | 33 | 32 [25] 24 16 | 79 | 10 | an [3 | 
SCoConosecoommoon 
Pe Plo sfal-[op Pfaff] fells 
P= Pe Ee EP EP Eel alee 
| 23 [2 | 47 6 [e]2 [7] 
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Teil 5: Noten und Tonperioden 


Die folgende Tabelle gibt die empfohlenen Tonperioden fur die Noten aller acht 
Oktaven an. 


Die erzeugte Frequenz ist nicht genau die gewtnschte Frequenz, da die 
Periodenangabe ganzzahlig sein mui. Der RELATIVE FEHLER gibt die 
prozentuale Differenz zwischen der gewiinschten und der tatsachlich erzeugten 
Frequenz an. 


NOTE FREQUENZ PERIODE  RELATIVER FEHLER 


.352 3822 -8.807% 
C# 324 3608 +8.007% 
~354 3465 -8.007% 
D# .445 3214 -0.004% 
.682 3034 +8.009% 

827 2863 -8.016% Oktave -4 
F# 2125 2783 +0.0097% 
- 580 2551 -8.002% 
G# -957 2468 +8.005% 
27,500 2273 +9.012% 
A# 29.135 2145 -0.0087% 
30.868 2625 +0.011% 


NOTE FREQUENZ PERIODE  RELATIVER FEHLER 


32.703 1911 -8.007% 
34.648 1804 +0.007% 
36.708 1703 +0.022% 
38.891 1607 -8.004% 
41.203 1517 +8.009% 
43.654 1432 +B.019% Oktave -3 
46.249 1351 -0.028% 
48.999 1276 +0.037% 
51.913 1204 +0.005% 
55.000 1136 -8.032% 
58.270 1073 +8.039% 
61.735 1912 -0.038% 
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NOTE FREQUENZ PERIODE RELATIVER FEHLER 


c 406 956 +0.046% 
CH 69.296 902 +0.007% 
D 1416 B51 -0 037% 
D# "782 804 +0.058% 
407 758 -0.057% 
"307 716 +8.019% Oktave -2 
FH "499 676 +0 046% 
"999 638 +0.037% 
GH 826 602 +0. 805% 
A 600 568 -8 032% 
AH 541 536 -0.055% 
Ho «123-2471 506 -0 038% 


NOTE FREQUENZ PERIODE RELATIVER FEHLER 


C 138.813 478 - 846% 
C#H 138.591 451 - 887% 
146.832 426 - 881% 
D# 155.564 462 858% 
164.814 379 057% 


174.614 358 819% Oktave -i 
184.997 338 046% 
195.998 319 037% 
207.652 301 “B05 % 
220.800 284 032% 
233.082 268 055% 
246.942 253 838% 


NOTE FREQUENZ PERIODE RELATIVER FEHLER 


C 261.626 239 +8.046% Mittleres C 
C# 277.183 225 -8.215% 

D 293.665 213 +0.081% 

D# 311.127 261 +8.858% 

E 329.628 199 +0.206% 

F 349.228 179 +8.819% Oktave 0 
FH 369.994 169 +8.046% 

G 391.995 159 -8.277% 

G# 415.3085 158 -8.328% 

A 440.000 142 -8.832% Kammerton A 
A# 466.164 134 -8.855% 

H 493.883 127 +0.356% 
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NOTE FREQUENZ PERIODE RELATIVER FEHLER 


c 523.251 -0.374% 
CH 554.365 +0.229% 
D 587.330 -9.390% 
pH 622.254 -0.441% 
E 659.255 +0. 206% 
F 698.457 -8.543% Oktave 1 
FH 739.989 -0.548% 
€ 783.991 +0.350% 
GH 830.609 -8.328% 
A 880.000 -0.032% 
A# 932,328 ~8.855% 
H 987.767 -B.435% 


NOTE FREQUENZ PERIODE RELATIVER FEHLER 


C 1846.582 +0.462% 
cC# 1188.731 -8.662% 
D 1174.659 -8.398% 
D# 1244.5088 -O0.441% 


cE  1318.510 "855% 
F 396.913 574% 
FH 1479.978 548% Oktave 2 
1567.982 "350% 
1661.219 "992% 
1760. 008 "357% 
1864.655 “417% 
1975533 "134% 


FREQUENZ PERIODE RELATIVER FEHLER 


2093.004 +0.462% 
2217.461 -8.662% 
2349.318 469% 
2489.016 441% 
2637.021 246% 
2793.826 685% 
2959.955 548% Oktave 3 
3135.963 350% 
3322.438 992% 
3520.000 357% 
3729.310 417% 
3951.66 134% 


Diese Werte werden alle vom Kammerton A aus wie folgt errechnet: 


FREQUENZ =440%(2 ft COKTAVE+((N-18)/12))) 
PERIODE = ROUND(62500/FREQUENZ) 


mit N=1 fir C, 2 fiir C#, 3 fir D, usw. 
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Teil 6: 
BASIC-Fehlermeldungen 


1 unexpected NEXT - unerwartetes NEXT 


Ein NEXT-Kommando wurde auferhalb einer FOR-Schleife gefunden, oder die 
Steuervariable im NEXT-Kommando paft nicht zu der im F 0R-Kommando. 


2 Syntax Error - Syntaxfehler 


BASIC versteht die eingegebene Zeile nicht, da irgendetwas in ihr unzulassig ist. 


3 Unexpected RETURN - unerwartetes RETURN 


Ein RETURN-Kommando wurde auSerhalb eines Unterprogramms gefunden. 


4 DATA exhausted - Daten zu Ende 


Ein READ-Kommando wurde gegeben, obwohl in DATA-Anweisungen keine 
Daten mehr vorhanden sind. 


5 Improper argument - ungiltiges Argument 


Dies ist eine Mehrzweck-Meldung. Der Wert eines Arguments in einer Funktion 
oder ein Befehlsparameter ist falsch. 


6 Overflow - Uberlauf 


Das Ergebnis einer arithmetischen Operation ist ‘ibergelaufen’. Es kann ein 
Gleitkommawert-Uberlauf sein, weil das Ergebnis gréSer als 1.7E } 38 ist. Oder 
es wurde erfolglos versucht, eine Gleitkommazahl in eine 16 Bit gro’e Ganzzahl 
mit Vorzeichen umzuwandeln. 


7 Memory full - Speicher voll 


Entweder sind das Programm oder seine Variablen einfach zu umfangreich, oder 
das Programm ist zu sehr verschachtelt (mit GOSUBs, WHILEs und FORs). 

Ein MEMORY-Kommando kann diese Meldung auslésen, falls der BASIC zur 
Verfiigung gestellte Speicherplatz zu klein oder viel zu grof gewahlt wurde. 
Beachten Sie, da8 eine geéffnete Datei Pufferplatz belegt, so daB der verfiigbare 
Speicherplatz kleiner wird. 
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8 Line does not exist -Zeile nicht vorhanden 


Die angesprochene Zeile kann nicht gefunden werden. 


9 Subscript out of range - Subskript auSerhalb des erlaubten Bereichs 


Ein Subskript (Indexzahl) in einer Matrix ist zu gro8 oder zu klein. 


18 Array already dimensioned - Matrix schon definiert 


Eine der Matrizen eines D IM-Kommandos wurde schon definiert. 


11 Division by zero- Division durch Null 


Kann bei ganzzahliger Division, Modulo- (Divisionsrest-) Bestimmung oder 
Potenzierung auftreten. 


12 Invalid direct command - Falsches Direktkommando 


Das zuletzt versuchte Kommando ist im Direkt-Modus nicht zulassig. 


13 Type mismatch - Typenunstimmigkeit 
Statt des geforderten String-Wertes wurde ein numerischer Wert eingegeben oder 


umgekehrt, oder in einem READ- oder INPUT-Befehl wurde ein falscher 
Zahlentyp eingegeben. 


14 String space full - Zeichenfolgen-Bereich voll 


Es wurden soviele Zeichenfolgen erstellt, da selbst kleinste Speicherplatze belegt 
sind. 


15 String too Long - Zeichenfolge zu lang 


Die Zeichenkette hat mehr als 255 Zeichen. Kann auftreten, wenn mehrere 
Zeichenketten aneinandergehangt werden. 


16 String expression too complex - Textausdruck zu komplex 


Textausdriicke kénnen zu viele Zeichenfolgen enthalten. Wenn deren Anzahl eine 
verninftige Grenze tiberschreitet, gibt BASIC diese Meldung aus. 
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17 Cannot CONTinue - CONT funktioniert nicht 

Das Programm kann aus irgendeinem Grund mit CONT nicht wieder 
aufgenommen werden. Beachten Sie, dafi CONT nur fiir das Wiederstarten eines 
Programms nach einem $TOP-Kommando, [ESC][ESC] oder nach einem Fehler 


ist, und eine zwischenzeitige Programmanderung ein Wiederstarten unmdglich 
macht. 


18 Unknown user function - unbekannte Anwender-Funktion 


Fir die aufgerufene Funktion wurde kein DEF FN-Kommando gefunden. 


19 RESUME missing - RESUME fehlt 


Das Programmende wurde wahrend einer Fehlerbehandlungsroutine erreicht, 
z.B.ineiner ON ERROR GOTO -Routine. 


2@ Unexpected RESUME - Unerwartetes RESUME 


RESUME ist nur wahrend einer Fehlerbehandlung erlaubt, z.B. in einer 
ON ERROR GOTO -Routine. 


21 Direct command found - Direktkommando gefunden. 


Beim Laden einer Datei wurde eine Zeile ohne Zeilennummer gefunden. 


22 Operand missing - Operand fehlt 


BASIC ist auf eine unvollstandige Anweisung gestoBen. 


23 Line too long - Zeile zu lang 


Eine Zeile wird im internen BASIC-Format zu lang. 


24 EOF met - EOF erreicht 


Es wurde versucht, eine Eingabedatei weiter zu lesen, obwohl das Dateiende (end 
of file) schon erreicht ist. 


25 File type error - Falscher Dateityp 


Die gelesene Datei ist vom falschen Typ. Mit OPENIN konnen nur 
ASCII-Textdateien erdffnet werden. LOAD, RUN usw. sind nur auf Dateitypen 
anwendbar, die mit SAVE gespeichert wurden. 
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“pelts 


26 NEXT missing - NEXT fehlt 


Ein passendes NEXT-Kommando fur ein gegebenes F0R-Kommando kann nicht 
gefunden werden. 


27 File already open - Datei schon gedffnet 


Ein OPENIN- oder OPENOUT-Befehl wurde gegeben, obwohl die Datei schon 
geoffnet ist. 


28 Unknown command - Kommando unbekannt 


BASIC kennt keine externen Befehle, z.B. solche, die mit einem Balken 
beginnen. 


29 WEND missing - WEND fehlt 


Kann fir eine gegebene WHI LE-Anweisung kein passendes WEND finden. 


38 Unexpected WEND - unerwartetes WEND 


Ein WEND wurde auSerhalb einer WHILE-Schleife angetroffen, oder ein WEND 
paBt nicht zur aktuellen WHILE-Schleife. 


31 File not open - Datei nicht gedffnet 
(Siehe folgenden Abschnitt mit dem Titel ‘AMSDOS Diskettenfehler’.) 


32 Broken in 


(Siehe folgenden Abschnitt mit dem Titel ‘AMSDOS Diskettenfehler’.) 


AMSDOS Diskettenfehler 


Bei der Bearbeitung von Dateien kénnen diverse Fehler auftreten. BASIC 
reagiert auf all diese Fehler mit der Fehlermeldung 32. Nahere Information kann 
nach Auftreten der Fehlernummer tiber die Funktion DERR eingeholt werden. 
Die DERR-Werte und ihre Bedeutung sind nachstehend aufgefiihrt: 
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AMSDOS-Fehler DERR-Wert Fehlerursache 


@ oder 22 ([ESC}wurde gedriickt 

142(128+14) Stream ist nicht im richtigen Zustand 

143(128+15) Ende der Datei (hard end) erreicht 

144(128+16) Fehlerhaftes Kommando, normaler- 
weise unzutreffender Dateiname 

145(128+17) Datei dieses Namens besteht bereits 


146(128+18) Datei besteht nicht 

147(128+19) Inhaltsverzeichnis ist voll 

148(128+20) Diskette ist voll 

149(128+21) Diskette wurde entnommen, wahrend 
Dateien gedffnet waren. 

150(128+22) Datei nur lesbar 

15 4(128+26) Dateiende (soft end) erreicht 


Hat AMSDOS bereits einen Fehler angegeben, wird Bit 7 gesetzt; demzufolge 
wird der Wert von DERR um 128 verschoben. 


Andere von DERR gemeldete Werte stammen vom Disk-Controller und sind 
bit-signifikant, wobei stets Bit 6 gesetzt ist. Bit 7 gibt an, ob der Fehler von 
AMSDOS (siehe oben) gemeldet wurde. Die einzelnen Bits haben folgende 
Bedeutung: 


c 
ot 


Bedeutung 


Adressenbezeichnung fehlt 

Nicht beschreibbar - Diskette mit Schreibschutz 

Keine Daten - Sektor unbekannt 

Laufwerk nicht bereit - keine Diskette im Laufwerk 
Uberlauffehler 

Datenfehler - CRC-Fehler 

Immer auf 1 gesetzt, um Fehler von Disk-Controller anzuzeigen 
Auf 1 gesetzt, wenn Fehler bereits von AMSDOS gemeldet wurde 


0 
1 
2 
3 
4 
5 
6 
7 
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ERR kann auch 31 ausgeben, wenn ein Zugriff versucht wurde, jedoch keine 
Datei geéffnet war. Die normale Form des Einsatzes von ERR und DERR ware 
eine Hinbeziehung eines ON ERROR GOTO-Befehls, der uber eine kurze 
Routine priifen la8t, ob ERR den Wert 31 oder 32 hat. Handelt es sich um 32, 
kann DERR nach weiteren Informationen tiber die Art des Fehlers abgefragt 
werden. 


Beispiel: 


16 ON ERROR GOTO 1600 

20 OPENOUT "datei.asc" 

30 WRITE #49,"test-daten" 

486 CLOSEOUT 

5@ END 

1000 amsdoserr=(DERR AND &7F):REM maskieren mit Bit 7 

1810 IF ERR<31 THEN END 

192@ IF ERR=31 THEN PRINT "Sind Sie sicher, dass Zeile 
20 richtig geschrieben ist?"”:END 

1030 IF amsdoserr=2@ THEN PRINT "Diskette ist voll, ne 
hmen Sie doch eine neue Daten-Diskette":END 

1940 IF amsdoserr=&X@10810800 THEN PRINT "“Legen Sie eine 
Diskette ins Laufwerk, und druecken Sie eine Tast 
e":WHILE INKEY$<>"": 
WEND:RESUME 

1058 END 


Teil 7: BASIC Schlusselworter 


Im folgenden sind alle Schneider CPC6128 BASIC-Schliisselworter aufgefiihrt. 
Diese Worter sind reserviert und diirfen nicht als Variablennamen verwendet 
werden. 

ABS, AFTER, AND, ASC, ATN, AUTO 

BINS, BORDER 


CALL, CAT, CHAIN, CHR$, CINT, CLEAR, CLG, CLOSEIN, CLOSEOUT, CLS, 
CONT, COPYCHR$, COS, CREAL, CURSOR 


DATA, DECS, DEF, DEFINT, DEFREAL, DEFSTR, DEG, DELETE, DERR, DI, 
DIM, DRAW, DRAWR 
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EDIT, EI, ELSE, END, ENT, ENV, EOF, ERASE, ERL, ERR, ERROR, EVERY, 
EXP 


FILL, FIX, FN, FOR, FRAME, FRE 


GOSUB, GOTO, GRAPHICS 

HEX$, HIMEM 

IF, INK, INKEY, INKEY$, INP, INPUT, INSTR, INT 

JOY 

KEY 

LEFT$, LEN, LET, LINE, LIST, LOAD, LOCATE, LOG, LOG10, LOWERS 
MASK, MAX, MEMORY, MERGE, MIDS, MIN, MOD, MODE, MOVE, MOVER 
NEXT, NEW, NOT 


ON, ON BREAK, ON ERROR GOTO @, ON SQ, OPENIN, OPENOUT, OR, 
ORIGIN, OUT 


PAPER, PEEK, PEN, PI, PLOT, PLOTR, POKE, POS, PRINT 


RAD, RANDOMIZE, READ, RELEASE, REM, REMAIN, RENUM, RESTORE, 
RESUME, RETURN, RIGHTS, RND, ROUND, RUN 


SAVE, SGN, SIN, SOUND, SPACES, SPC, SPEED, SQ, SQR, STEP, STOP, 
STR$, STRINGS, SWAP, SYMBOL 


TAB, TAG, TAGOFF, TAN, TEST, TESTR, THEN, TIME, TO, TROFF, TRON 
UNT, UPPERS, USING 

VAL, VPOS 

WAIT, WEND, WHILE, WIDTH, WINDOW, WRITE 

XOR, XPOS 

YPOS 


ZONE 
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Teil 8: Entwurfsgitter 


Bildschirmplan fiir Text- und Window-Entwurf - Modus 0 (20 Spalten) 
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Bildschirmplan fur Text- und Window-Entwurf -Modus 1 (40 Spalten) 


»{[ T | 
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Modus 2 (80 Spalten) 


Entwurf 


und Window- 


hirmplan fiir Text- 


Bildsc 


oe 8 SM we 4 OL 8 99 9 72 O89 BS 95 8 2 OS BH SH HH ze 


Ov 8€ SE ve 2E Of Bf 9 we 2 O2 Bt Bt ww 
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Ubersicht 


Gitter zur Planung von Hillkurven und Musik 
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Teil 9: Anschlusse 


CPC6128 Eingangs-/Ausgangs-Buchsen 


Kassettenlaufwerk| Stereo-Buchse 
Diskettenlaufwerk 2 if ; DruckeranschluB 
lP, 12V Gleichstrom-Stecker 


i J ick 
Monitor © ErweiterungsanschluB ayer 


Joystick-Buchse 


Riickansicht 


aufwarts i Feuer 2 
abwarts i Feuer 1 
links i gemeinsam 


rechts gemeinsam 2 
frei 
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Monitor-Buchse 


Rickansicht 
° - ° 5 2 1 
° ° 
° 4 3 2 


Stift1 rot Stift 4 | Synchronisation 


Stift2 grin Sttift5 Erde 
Stift3  blau Stift6 Luminanz 


Stereo-AnschluB 


RECHTS 
CEO ee 
| /\_________ RECHTS 
| 
| ERDE 
| 
ERDE LINKS 


Stift 1 linker Kanal 


Stift 2 rechter Kanal 
Stift 3 Erde 


Kassetten-Buchse 


Riickansicht 


Stift1 | Fernsteuerung | Stift4 Dateneingang 
Stift2 Erde StiftS |Datenausgang 
Stift3 | Fernsteuerung 
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Ubersicht 


Erweiterungs-AnschluB 


Riickansicht 


27) «25 «230«21~=«19~=S 17,1513 9 7 5 3 1 


AnschluB fiir zweites Diskettenlaufwerk 


Ubersicht 


6 8 10 12 14 


Riickansicht 


16 18 20 22 24 26 28 30 32 34 


Banas Be we eas 


1f 11 we oC ueee © anaes © pee 6 eee Bees 5 coe! 


ITIL oI Cac oe TT TTC_IT J 


JT —IT TT IT 


5 7 9 HW 13 


READY 

GND 

SIDE 1 SELECT 
GND __ 
READ DATA 
GND 


WRITE PROTECT 


GND 


TRACK O 


GND 
WRITE GATE 
GND 
WRITE DATA 
GND 
STEP 
GND 


5 17 19 21 23 25 27 29 31 33 


GND 

MOTOR ON 
GND 

N/C 

GND 

DRIVE SELECT 1 


DIRECTION SELECT 
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Drucker-AnschluB 


Riickansicht 


17, 16 «#15 144 «130 «12 ~«11~—~«10 9 8 7 6 5 4 3 2 1 


35 34 33 32 #31 #30 29 28 27 26 2 24 #23 22 21 20 19 


GND 
GND 
GND 
GND 
GND 
GND 
GND 
PIN GND 
PIN GND 
PIN GND 
Alle weiteren Stifte NC 


1 
2 
3 
4 
5 
6 
7 
8 
9 


2BRr 
222 


2 
2 
=a 
b 


Teil 10: Drucker 
Drucker-Schnittstelle 


Das CPC6128-System erméglicht den Anschlu8 und Betrieb eines 
Indurstrienorm-Druckers mit ‘Centronics-Schnittstelle’. 


Das Druckerkabel ist eine einfache eins-zu-eins-Verbindung zwischen der 
PRINTER-Buchse an der Riickseite des Computers und der Anschlufstelle des 
Parallel-Druckers. Beachten Sie, dai die Platine des Computers zwei ‘Finger’ 
weniger hat als die AnschluBstelle des Druckers. Dies erméglicht die Verwendung 
von Standard-Platinensteckern. , 


Die Belegung der Schnittstelle im einzelnen ist im 9. Teil dieses Kapitels 
behandelt. 


Das Kabel sollte Stift 1 des Computers mit Stift 1 des Druckers, Stift 19 des 
Computers mit Stift 19 des Druckers usw. verbinden. Die Stifte 18 und 36 sollten 
jedoch nicht mit dem Computer verbunden werden. 
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Beachten Sie, da sich 17 ‘Finger’ in der oberen Reihe der Drucker-AnschluBleiste 
befinden, da8 jedoch die untere Reihe mit Nummer 19 und nicht mit 18 beginnt. 
Damit ist gewahrleistet, da die Leitungen jeweils den Finger der 
Computer-Platine mit dem gleich numerierten Stift der Druckerbuchse 
verbinden. 


Der Computer setzt das BUSY-Signal (Stift 11) ein, um zu prifen, ob der Drucker 
bereit ist; er wartet, wenn sich der Drucker im OFF-LINE-Zustand befindet. 

Sie brauchen hierbei keine besonderen Benutzer-Befehle einzugeben; durch 
Angabe von #8 wird die Ausgabe zum Drucker geschickt. 


Die Drucker-Schnittstelle im CPC6128 ist so ausgelegt, da nicht nur einfache 
Matrixdrucker, sondern mit entsprechender Schnittstelle auch Typenraddrucker, 
Graphikplotter und Farb-Tintenstrahldrucker angeschlossen werden konnen. In 
jedem Falle wird die erforderliche Kompatibilitat durch die genormte parallele 
Schnittstelle gewdhrleistet. 


Die kundenspezifisch angepa&te Software im Schneider NLQ401 ermdglicht den 
Punktgraphik-Betrieb und das Ausdrucken ganzer Bildschirmabzige. 


Der NLQ401 ist auBerdem in der Lage, den kompletten deutschen Zeichensatz zu 
drucken. 


Teil 11: Joysticks 


Die im Schneider CPC6128 eingebaute Software unterstiitzt einen oder zwei 
Joysticks, die wie ein Teil der Tastatur behandelt werden und deshalb mit 
INKEY und INKEY$ abgefragt werden kénnen. 


Hierzu ist anzumerken, da der 6128 in den meisten Fallen den 
Haupt-Feuerknopf des Joysticks als ‘Feuer’ 2 interpretiert. 


Die Funktionen JOY(@) und JOY(1)  erméglichen eine  direkte 
Zustandsprifung des ersten bzw. zweiten Joysticks. Die Funktion liefert ein 
bit-signifikantes Ergebnis, das die Bewegungsrichtung des Joysticks zum 
Zeitpunkt der letzten Tastatur-Abfrage anzeigt. 


Die nachstehende Tabelle zeigt die von beiden Joysticks gelieferten Werte. Hinter 
den Werten, die nach einem JOY-Befehl ausgegeben werden, sind die 
entsprechenden ‘Tastenwerte aufgefiihrt, die zB. in INKEY- oder 
KEY DEF-Befehlen als Parameter eingesetzt werden. 
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richtung 
Bit angezeigter | Erster Zweiter Entsprechende 
Wert Joystick | Joystick Taste 
72 


aufwarts 

abwarts 73 
links 74 
rechts 

Feuer 2 


Feuer 1 


Wenn der zweite Joystick geprift wird, kann der Computer nicht unterscheiden, 
ob der Joystick oder die entsprechende Taste der Tastatur (siehe letzte Spalte in 
obiger Tabelle) bedient wurde. Dies bedeutet, da anstelle des zweiten Joysticks 
auch die Tastatur verwendet werden kann. 


Teil 12: Disketten-Organisation 


Das BIOS unterstiitzt drei Diskettenformate: SYSTEM-, DATA ONLY-und 
IBM-Format. Unter AMSDOS wird das Diskettenformat automatisch beim 
Zugriff auf eine Diskette mit noch nicht eréffneten Dateien erkannt. Um diese 
automatische Unterscheidung zu erméglichen, besitzt jedes Format eigene 
Sektor-Nummern. 


3 Zoll-Disketten sind beidseitig verwendbar. Der Computer kann jedoch immer 
nur auf den Datenbestand einer Diskettenseite zugreifen. (Zum Bearbeiten der 
anderen Seite wird die Diskette umgedreht.) Die beiden Seiten der Diskette 
kénnen unterschiedliche Formate besitzen. 


Gemeinsame Eigenschaften aller Formate 


- Die beiden Seiten einer 3 Zoll-Diskette werden nie gleichzeitig bearbeitet (single 
sided) 


- Physikalische Sektorgré%e: 512 Byte 
- 40 Spuren, von 0 bis 39 numeriert 

- CP/M-Blockgréfe: 1024 Byte 

- 64 Platze im Inhaltsverzeichnis 
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System-Format 


9 Sektoren pro Spur, mit den Nummern &41 bis &49 
2 reservierte Spuren 


Das System-Format ist das wichtigste Format, da CP/M nur von einer Diskette 
mit System-Format geladen werden kann. Beim Warmstart mit CP/M 2.2 mui 
ebenfalls eine System-Format-Diskette eingelegt werden. Die reservierten Spuren 
werden wie folgt verwendet: 


CP/M 2.2 CP/M Plus 
i Fo 
Spur 0 Sektor &41 Urlader fiir Urlader fir 
CP/M 2.2 CP/M Plus 
Spur 0 Sektor &42 Konfigurations 
Sektor 
Spur 0 Sektoren &43 bis &47 —_ unbenutzt unbenutzt 
Spur 0 Sektoren &48 und &49 
Spur 1 Sektoren &41 bis &49 } CCP und BDOS 


Hinweis: Das VENDOR-Format ist eine spezielle Variante des System-Formats, 
das keine Software auf den beiden reservierten Spuren enthalt. Dieses Format 
wird fiir handelsiibliche Software verwendet. 


DATA-ONLY-Format 


9 Sektoren pro Spur, mit den Nummern &C1 bis &C9 
Keine reservierten Spuren 


Dieses Format ist nicht fiir die Anwendung mit CP/M 2.2 geeignet, da mit ihm 
kein ‘Warmstart’ méglich ist. Wird jedoch nur CP/M Plus oder AMSDOS 
verwendet, steht mit einer DATA-ONLY-Diskette etwas mehr Speicherplatz zur 
Verfiigung. 


IBM-FORMAT *nur fir CP/M 2.2 


8 Sektoren pro Spur, mit den Nummern &1 bis &8 
Kine reservierte Spur 


Dieses Format ist logisch das gleiche Format wie das mit CP/M auf dem IBM PC 
verwendete Single-Side-Format. Der CPC6128 kann auf IBM-Format-Disketten 
schreiben, bzw. von ihnen lesen, er kann sie jedoch nicht kopieren oder 
IBM-Format erzeugen. 
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Teil 13: Eingebaute 
Systemerweiterungen (RSX) 


Im 5. Kapitel wurden unter dem Titel ‘AMSDOS’ externe Befehle vorgestellt. 
Externe Befehle dienen im Grunde dazu, den BASIC-Wortschatz zu erweitern. 
Diesen zusatzlichen Befehlen wird ein Balken 1!  vorangestellt. Die 
Maschinenanweisungen fiir die neuen AMSDOS-Befehle sind im ROM enthalten; 
die Einbeziehung der neuen Befehle erfolgt automatisch mit dem Einschalten des 
6128 BASIC. 


Es ist auch moglich, weitere externe Befehle nach dem BASIC-Start 
hinzuzufiigen, indem die Maschinenanweisungen ins RAM geladen werden. 
Derartige neue Befehle werden RSXe (Resident System eXtensions) genannt und 
arbeiten genauso wie ROM-Erweiterungen. RSXe miissen jedesmal, wenn BASIC 
gestartet (oder wieder gestartet) wird, von Diskette oder Kassette geladen 
werden. RSXe werden gewohnlich verwendet, um irgendein intelligentes 
Peripherie-Gerat, wie einen Lichtgriffel oder Sprachsynthesizer, zu steuern. 


Im 8. Kapitel wird beschrieben, wie RSXe benutzt werden, um auf die zweiten 
64K im Speicherbereich des 6128 zuzugreifen. 
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Teil 14: Speicher 


Der CPC 6128 besitzt 128K RAM und 48K ROM. Dieser Speicherplatz steht 
BASIC 1.1 zur Verfiigung, wie die Skizze unten darstellt. Die ersten 64K RAM 
sind nominell in vier Blécke zu je 16K eingeteilt, die Block 0 bis Block 3 genannt 
werden. Der Bildschirm benutzt Block 3, und der obere Teil von Block 2 ist wie 
angegeben mit System-Variablen belegt. 


Erster 64K RAM-Speicher Zweiter 64K RAM-Speicher 
{unbenutzt) 


(Pe ae 
Block 3 | i 
i 
{ Bikdschirm } BASIC ROM : Disketten-ROM 
. { H 
ee Bco0- 1 : 
\ 
| Siohe : ; 
‘Bon meet ung 1 a : Hl 
1 : 
t 1 
H ’ 
' ( 
i \ 


Fernware-t 
Biock2 2 vie °F dein nrg Bem eromsrs Dassen ! 
BASIC-Datenbereich | 
ae Oisketten-ROM-Detendereich 
Andere ROM-Datenbereiche ! 


a t 


\ 
f 
Block 1 < \ 
i 


— 
r 
P Basic. -Programmbereich 


Block 0 < 
bia! Firmware ROM 
oar el J ae 


Anmerkung 1: Abhangig von zusatzlich angeschlossenen ROMs; &A6FC, wenn keine ROMs angeschlossen sind. 


Tis 


Speicherbelegungsplan fur BASIC 1.1 


Die Benutzer-definierten Zeichen werden anfanglich direkt iber HIMEM (die 
héchste dem Benutzer zur Verfiigung stehende Speicheradresse) plaziert. HIMEM 
kann durch den MEMORY-Befehl verandert werden. Wenn AMSDOS-Dateien 
gedffnet sind, wird HIMEM automatisch um 4K heruntergesetzt, um einen 
Pufferbereich zu schaffen. Die Anzahl der Benutzer-definierten Zeichen kann nur 
verandert werden, wenn HIMEM seit der letzten Definition von Zeichen nicht 
geandert wurde (es sei denn, der Befehl SYMBOL AFTER 256 lief beim letzten 
Mal keine Zeichen als Benutzer-definierbar zu). Wenn BASIC gestartet wird, sind 
soviele Zeichen Benutzer-definierbar, als ware die |§Anweisung 
SYMBOL AFTER 248 gegeben worden. 
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Es ist deshalb zu empfehlen, den Speicherbereich fiir Benutzer-definierte Zeichen 
vor einer dauerhaften Neu-Festlegung von HIMEM zu léschen und die 
Benutzer-definierten Zeichen in einem neuen Bereich anzusiedeln. Dadurch kann 
in nachfolgenden Programmen der Wert von SYMBOL AFTER gedandert werden. 


Das folgende Beispiel zeigt diesen Vorgang, wenn HIMEM im Zusammenhang mit 
dem Laden eines RSX tiefer gesetzt wird: 


100 SYMBOL AFTER 256 ' benutzer-def. zeichen loeschen 
118 rsxadresse=HIMEM-rsxlaenge 

120 MEMORY rsxadresse-1 

130 LOAD "rsxcode",rsxadresse 


148 CALL rsxadresse ' rsx log in 
150 SYMBOL AFTER 148 ' benutzer-def. zeichen wiederhers 
tellen 


1 
i 
q 
! 


{ 
Firmware-Datenbereich 
Jump-Block 
BASIC-Datenbersich 
Disketten-ROM-Datenbereich 
Andere ROM-Datenbereiche 

4 


! 
| 
| 
| 
| 
| 
i 
| 
i 
1 


Speicherbelegungsplan mit RSX an empfohlener Position 
Zusatzliche Ein-/Ausgabe 


Die meisten Eingabe-/Ausgabeadressen werden vom Computer belegt, 
insbesondere sollten Adressen unterhalb &7FFF nicht benutzt werden. 
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Der Adressenteil AO - A7 sollte die Art des externen Ein-/Ausgabegerates 
angeben, wahrend die Adressenleitungen A8 und AQ decodiert werden kénnen, 
um Register innerhalb des Ein-/Ausgabegerates zu wahlen. Von den tbrigen 
Adressenleitungen mui nur A10 decodiert werden (als niedrig), wahrend die 
Leitungen All - A15 als hoch gelten. Somit kann jedes Gerat mit Registern 
ausgertistet werden, die &F8??, &F9??, &FA?? und &FB?? als Adresse haben, 
wobei ?? den Bereich DC bis DF fiir Kommunikations-Schnittstellen und den 
Bereich EO bis FE fir Benutzer-Peripheriegerate angibt. 


Hierbei ist zu beachten, da8 Z80-Anweisungen benutzt werden missen, die das 
B-Register auf die obere Halfte des Adressenbus setzen. 


Zusatzliche ROMs 


Anstelle der vorhandenen ROMs konnen zusatzliche ROMs eingesetzt werden. 
Die Adressenzuordnung und Bankauswahl-Logik sind in einem Modul enthalten, 
das an den Erweiterungsbus angeschlossen ist. Alle erforderlichen Signale 
werden zum Erweiterungsbus tibertragen. 


Teil 15: CP/M Plus 
Bildschirm-Anpassung 


Im ersten Teil dieses Kapitels wurden die Steuer-Zeichen und ihre Funktionen 
aufgefiihrt. Diese Funktionen werden ausgetibt, wenn von BASIC oder CP/M 2.2 
Text zum Bildschirm geschickt wird. Sie sind einfach zu benutzen und spiegeln 
die Moéglichkeiten des Firmware Text-Terminals wider. Diese Moglichkeiten 
bieten nur Schneider-Computer, weshalb die Software entsprechend angepaft 
werden muh. 


In der Umgebung kommerziell genutzter CP/M Plus-Software wird normalerweise 
eine Reihe von Standard-Text-Terminal-Méglichkeiten erwartet, damit die 
Software auf unterschiedlichen Computern eingesetzt werden kann. Das CP/M 
Plus-Betriebssystem des CPC6128 besitzt eine Bildschirmanpassung, die ahnliche 
Voraussetzungen schafft wie ein Zenith Z19/Z29 Terminal. Das 
Installations-Programm fir CP/M _ Plus-Software wird normalerweise 
standardmaBig eine Option fir diese Art von Terminal enthalten. 


Die Méglichkeiten der CP/M Plus Bildschirm-Anpassung sind zum Teil dieselben, 
die vorher durch das Firmware Text-Terminal geboten wurden. Allerdings 
werden hierfiir andere Steuer-Codes verlangt. 


Ubersicht Kapitel 7 Seite 49 


Dariiberhinaus bietet die CP/M Plus Bildschirm-Anpassung eine Reihe neuer und 
komplexerer Operationen. 


Zeichen zwischen &20 und &FF werden an der gegenwartigen Cursor-Position 
dargestellt. Befindet sich der Cursor nicht in der rechten Spalte, wird er um eine 
Spalte nach rechts geriickt. Wenn der Cursor in der rechten Spalte liegt und der 
Bildumlauf (wrapping) in Kraft ist, taucht er in der nachsten Zeile auf der linken 
Spalte auf, wobei das Bild nétigenfalls nach oben rollt. 


Zeichen zwischen &00 und &1F haben folgende Steuer-Funktionen: 
&07 BEL Erzeugteinen Piepston. 


&08 BS (backspace) Bewegt den Cursor um eine Spalte nach links. 
Befindet er sich auf der linken Spalte und nicht in der obersten 
Zeile, springt er zur rechten Spalte in der dariiberliegenden Zeile, 
vorausgesetzt, der Bildumlauf ist in Kraft. 


&0A LF (linefeed) Bewegt den Cursor um eine Zeile nach unten, wobei das 
Bild nétigenfalls nach oben gerollt wird. 


&0D CR (carriage return) Bewegt den Cursor zum linken Rand in 
derselben Zeile. 


&1B ESC  Fuhrteine Escape-Folge ein. 


Folgende Escape-Folgen sind méglich. Werden andere als die aufgefiihrten 
Zeichen in einer Escape-Folge eingegeben, so werden sie dargestellt und der 
Cursor ruckt eine Stelle vor. Auf diese Weise kénnen die Zeichen dargestellt 
werden, die den Steuer-Codes &00 bis &1F entsprechen. (Beachten Sie, da’ viele 
Sprachen-Anwendungen den Steuer-Code &09 [TAB] um Leerstellen erweitern, 
und deshalb die Folge [ESC][TAB] haufig nicht das Zeichen fiir &09 ausgibt.) 


[ESC]O Setzt die Status-Zeile auSer Betrieb. Diskettensystem-Meldungen 
werden tiber den CRT-Bildschirm ausgegeben. Die unterste Zeile 
des Bildschirms kann von CRT genutzt werden. 


[ESC]1 Setzt die Status-Zeile in Betrieb. Die unterste Bildschirmzeile ist 
fir Diskettensystem-Meldungen reserviert. 


[ESC]2.n, Andert den Zeichensatz (siehe Teil 16 in diesem Kapitel). «n> ist 
der Sprachen-Parameter, der mit &07 maskiert wird. Bestimmte 
Zeichen-Matrizen zwischen &20 und &7F werden mit anderen 
Zeichen zwischen &80 und &FF ausgetauscht. Dieser Befehl ist 
vergleichbar mit Steuer-Befehlen bei Druckern, die mit Software 
zur Auswahl internationaler Zeichensatze ausgeriistet sind. 
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[ESC]3.m> 


[ESCJA 


[ESC]B 


[ESC]C 


[ESC]D 


[ESC]E 


[ESC]H 


[ESC]I 


[ESC]J 


[ESC]K 


[ESC]L 


Ubersicht 


m=0 amerikanisch 
am =1 franzésisch 
“mp =2 deutsch 

am =3 englisch 

am =4 danisch 
m=5 schwedisch 
ap =6 italienisch 
m=7 spanisch 


Andert den Bildschirm-Modus. «m =Bildschirm-Modus+ &20. Der 
Wert wird mit &3 maskiert, um die Modi 0 bis 2 zu ergeben. Der 
Bildschirm wird geléscht, die Cursor-Position bleibt erhalten. 


Bewegt Cursor aufwarts. Liegt er in der obersten Zeile, passiert 
nichts. . 


Bewegt Cursor abwarts. Liegt er in der untersten Zeile, passiert 
nichts. 


Bewegt Cursor vorwarts. Liegt er auf der Spalte ganz rechts, 
passiert nichts. 


Bewegt Cursor riickwarts. Liegt er auf der Spalte ganz links, 
passiert nichts. 


Léscht die Seite. Cursor-Position bleibt erhalten. Dieser Befehl 
léscht den gesamten Bildschirm, auch im 24x80-Modus. (Andere 
Escape-Codes gelten nur fiir den 24x80-Bereich, wenn der 
24x80-Modus gesetzt ist.) 


Schickt Cursor in die Ausgangsposition (oberste Zeile, Spalte ganz 
links). 


Bewegt Cursor eine Zeile nach oben. Rollt den Bildschirm 
noétigenfalls nach unten. 


Léscht alle Zeichen von der Cursor-Position einschlieBlich bis zum 
Ende des Bildschirms. Cursor bleibt an seiner Position. 


Léscht alle Zeichen von der Cursor-Position einschlieBlich bis zum 
Ende der Zeile. Cursor bleibt an seiner Position. 


Schiebt eine Leerzeile ein. Alle Zeilen ab der Zeile, in der sich der 


Cursor befindet, werden um eine Zeile nach unten verschoben. 
Der Cursor bleibt in seiner Zeile. 


Kapitel 7 Seite 51 


[ESC]M Loscht die Zeile, in der sich der Cursor befindet. Alle darunter 
liegenden Zeilen werden nach oben geschoben. Die unterste Zeile 
bleibt frei. Der Cursor verandert seine Position nicht. 


[ESCJN Léscht das Zeichen, auf dem sich der Cursor befindet. Alle Zeichen 
rechts vom Cursor werden um eine Position nach links gertickt. 
Die Stelle am Ende der Zeile wird frei. Der Cursor verandert seine 
Position nicht. 

[ESC]Y -Z.S. Rickt den Cursor an die angegebene Position. Liegt diese Position 
auBerhalb des Bildschirmbereichs, rickt der Cursor zum 
Bildschirmrand. :Z>= Zeile+ &20, ‘S»=Spalte+&20. Die linke obere 
Ecke des Bildschirms ist als Zeile 0, Spalte 0 definiert. 


{ESC]b-FP> Definiert die Schriftfarbe fiir alle Zeichen auf dem Bildschirm. 
<FP> ist der Farb-Parameter. Er wird mit &3F maskiert und dann 
als eine von drei 2-Bit-Zahlen behandelt, die den Intensitatsgrad 
der drei Grundfarben darstellen. Bits 0 und 1 stehen fir blau, Bits 
2 und 3 fiir rot, Bits 4 und 5 fur grtin. Der CPC6128 bietet drei 
Farbstarkegrade, die auf den vier definierbaren Ebenen 
folgendermafen dargestellt sind: 


CPC6128 Keine Farbstarke Halbe Farbstarke | Volle Farbstarke 
Farb-Bits 01 oder 10 bina 


[ESC]c-FP> Legt die Farbe des Hintergrunds fest. Gilt fiir den gesamten 
Hintergrund und den Rand. Die Farben sind wie oben angegeben 
definiert. 


[ESC ]d Léscht alle Zeichen von der Cursor-Position einschlieBlich bis zum 
Bildschirm-Anfang. Die Position des Cursors bleibt unverandert. 


[ESC]e Macht den Cursor sichtbar. Um ein unschénes Blinken zu 
vermeiden, wird der Cursor nicht wahrend der normalen 
Textausgabe eingeschaltet, sondern erst 1/10 Sekunde nachdem 
das letzte Zeichen geschrieben wurde. . 

[ESC]f Macht den Cursor unsichtbar. 


[ESC]j Speichert die Cursor-Position. 
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[ESC]k 


[ESC ]] 


[ESC]o 


[ESC ]p 


[ESC lq 
[ESClr 


[ESClu 


[ESC]v 


[ESC]w 


[ESC]x 


[ESCly 


Ubersicht 


Setzt den Cursor wieder an die Position, die mit [ESC] 
gespeichert wurde. 


Léscht die Zeile, in der sich der Cursor befindet. Die Position des 
Cursors bleibt unverandert. 


Léscht alle Zeichen von der Cursor-Position einschlieflich bis zum 
Zeilenbeginn. Position des Cursors bleibt unverandert. 


Schaltet auf invertierte Darstellung um, dh. Schrift- und 
Hintergrundfarbe werden vertauscht. 


Macht die invertierte Darstellung rickgangig. 


Schaltet Unterstreichungsmodus ein. (Wird vom CPC6128 nicht 
untersttitzt.) 


Schaltet Unterstreichungsmodus ab. (Wird vom CPC6128 nicht 
unterstitzt. ) 


Schaltet Bildumlauf ein. Am Ende einer Zeile angelangt, wird 
automatisch in der nachsten Zeile weitergeschrieben. 


Schaltet Bildumlauf ab. Alles, was tiber eine Zeile hinaus 
geschrieben wird, wird ignoriert. 


Schaltet auf 24x80-Modus um. Manche Anwender-Programme 
erfordern einen ‘Standard’-Bildschirm von 24x80. Dieser Befehl 
stellt einen solchen Bildschirm her, gleichgiltig, welche Ausmake 
der Bildschirm tatsachlich hat. (Dies hangt ab vom Gerat, vom 
Land, und davon, ob die Status-Zeile an- oder abgeschaltet ist.)Der 
Bildschirm wird geloscht. 


Schaltet 24x80 Modus ab. Bildschirm wird geléscht. 
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Teil 16: CP/M Plus Zeichensatz 


Im 10. Teil dieses Kapitels wurde eine Ubersetzungstabelle fiir den Drucker 
vorgestellt. Mit Hilfe dieser Tabelle konnen bestimmte Zeichen des BASIC- und 
CP/M 2.2- Zeichensatzes umgewandelt werden, damit der Drucker die Zeichen der 
Sprache ausgibt, die gewahlt wurde. Diese Méglichkeiten sind etwas beschrankt, 
da nur sehr wenige Drucker fremdsprachige Zeichen haben, die auch im 
BASIC-Zeichensatz vertreten sind. 


Obwohl solch eine Ubersetzungstabelle auch unter CP/M Plus anwendbar ist, 
wurde der Zeichensatz erweitert, um eine fast véllige Ubereinstimmung zwischen 
den Zeichen auf dem Bildschirm und den gedruckten Zeichen zu erreichen. (Das 
einzige fehlende Bildschirm-Zeichen ist das Symbol fiir die schwedische Wahrung 
anstelle des Dollarzeichens). Die Abbildung unten zeigt die Umwandlungstabelle 
fiir den internationalen Zeichensatz: 


23 24 40 5B 5C 5D 5E 60 7B 7C 7D 7E 
Amerikanisch | $F | & FE ? 
Franzisisch | ¥ ¥ H = E 
Deutsch # $F 8 G | 
Englisch E¢& £) 
Danisch #28 ES at e & 
scwedscr |H EE RG HU ES 
taienisch JE SRS RLEPH A Ss & 
snisch JR ER GHG E= 


He ETE 


Hi 


CP/M Plus Internationaler Zeichensatz 
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Um den Computer in einer Fremdsprache zu _ betreiben, sind zwei 
Voraussetzungen zu erfiillen: 


1. Der Drucker selbst sollte auf die Fremdsprache eingestellt sein. (Dies 
geschieht haufig mit kleinen DIP-Schaltern, obwohl einige Drucker auch mit 
Steuer-Codes umgestellt werden kénnen.) 


2. Der gewiinschte Bildschirm-Zeichensatz mu aufgerufen werden, entweder 
durch den transienten Befehl: 


LANGUAGE <n> 

..oder indem der Bildschirm mit: 
[ESC]2<n> 

..angepaft wird. 


In der Praxis wird die Umschaltung auf einen fremdsprachigen Zeichensatz als 
Teil des PROFILE.SUB-Programms mit den  Dienstprogrammen 
LANGUAGE und SETLST vorgenommen. CP/M Plus ist urspriinglich auf den 
amerikanischen Zeichensatz eingestellt. 


7 Bit Software 


Die Umstellung auf Zeichensatze anderer Sprachen hat zwar grofe Vorteile, es 
mu aber darauf hingewiesen werden, da nach solch einer Umstellung einige 
Zeichen der amerikanischen Tastatur nicht mehr dargestellt werden konnen. Dies 
ist ein Problem, das sich aus der 7Bit-Software ergibt: Fast alle Software, ein- 
schlieBlich der meisten CP/M Plus Dienstprogramme, Textverarbeitungs- 
programme und Computer-Sprachprogramme, basiert auf einem 7Bit-Zeichensatz. 


Der englische Zeichensatz unterscheidet sich nur durch ein Zeichen vom 
amerikanischen. In anderen Zeichensaétzen werden hingegen mehr Zeichen, z.B. 
das Balken-Symbol oder die eckigen Klammern, durch Akzente, Umlaute usw. 
ersetzt. Dadurch wird zwar die Lesbarkeit von Texten verbessert. In Situationen 
jedoch, wo ein Anwenderprogramm den Balken oder eckige Klammern verlangt 
(z.B. DIR CALLJ), wird die Lesbarkeit und - falls die Tastenknépfe ausgetauscht 
wurden - die Schreibbarkeit erheblich beeintrachtigt. Denken Sie daran, dafi das 
Anwenderprogramm mit ASCII-Werten arbeitet, ganz gleich, in welche Sprache 
ein Zeichen auf dem Bildschirm tibersetzt wurde. Das Problem ist, da mit 
7Bit-Software einfach nicht geniigend ASCII-Werte zur Verfiigung stehen. 
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8 Bit-Zeichensatze 


Der BASIC-Zeichensatz besteht aus 256 Zeichen mit den Werten 128 bis 255 (&80 
bis &FF). Zum Teil handelt es sich um graphische Symbole, die fir 
Computerspiele benutzt werden (tanzende Mannchen, Herz-, Pik-, Kreuz-, 
Karo-Symbole usw.) CP/M Plus hat ebenfalls 256 Zeichen, wobei sich die letzten 
128 vom BASIC-Zeichensatz unterscheiden: sie machen CP/M Plus fir die 
internationale Geschaftswelt gebrauchsfahig. 


0123456789ABCDEF 0123456789ABCDEF 
eOTA@«+n8Rtbe+t00 =HCFU rr HS a sl aa 
xeBUGEGORP HPT TAA A [fete t eho 249-94 

1" #Eeve' OC} Bt, - LS AGOCE ORF tue yaewk s i 
@©123456789:;4=3 97 Fo '4HtsBSe Boe a™ 
PABCBEFGHIUEKLMHO AETHEGAETEGAF?TADY 
PQ@RSTUUHAYZES IT _ AETGCUCHADAAG? £ ¥ x 
“abcdefahiagkiano A6@isaGeeTIEGAeT SOY 
Pqrstuvuxyzt is" 6 HB@LYoutc#aARBHASAPERE 


NO OH & OND = OG 
“nmoodwp © wo 


Zeichen 0 bis 127 (&00 bis 7F) Zeichen 128 bis 255 (&80 bis &FF) 


Der Standard- CP/M Plus- Zeichensatz (amerikanisch) 


Software, die mit 8 Bit-Zeichen betrieben werden kann, ist mit diesem 
Zeichensatz in der Lage, auf alle fremsprachigen Zeichen direkt zuzugreifen, ohne 
die Sprache wechseln zu mtissen. Auf diese Weise bleiben Zeichen wie Balken und 
eckige Klammern erhalten. 


Bitte beachten Sie, da8 das 8 Bit-Softwareangebot z.Z. noch sehr begrenzt ist, und 
daB Zeichen zwischen 0 und 31 sowie 128 und 255 auf dem Bildschirm 
ausschlieBlich in der oben dargestellten Form erscheinen. Ein Drucker wird 
dagegen andere Vorstellungen vom Aussehen dieser Zeichen haben. 
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Kapitel 8: 
Naheres wher den Bank Manager 


BASIC-Erweiterungen fiir den Zugriff auf die zweiten 64K im 
RAM-Speicher 


Behandelte Themen: 


% Speichern von Bildschirminhalten 
% Pseudo-Datei-Operation 


Aus dem Speicherbelegungsplan fiir BASIC 1.1 (Kapitel 7, Teil 14) ist zu 
entnehmen, dai 64K des 128K umfassenden RAMs ungenutzt sind. BASIC und 
die Firmware sind im ROM-Speicher untergebracht, der zusammen mit dem 
Disketten-ROM die normale Speicherkapazitat von 64K auf 112K erweitert (64K 
RAM + 48K ROM). 


Jeweils 16K im Speicher bilden einen Block, und eine Einheit aus vier Blocken 
(=64K) nennt man Bank. Den Vorgang zur Blockauswah! nennt man ‘bank 
switching’. 

Der Z80 Mikroprozessor kann sich immer nur mit 64K auf einmal beschaftigen. 
Deshalb enthalt das Betriebssystem Anweisungen, mit denen das Firmware-ROM 
anstelle von Block 0 des RAM hinzugeschaltet werden kann. Ebenso kénnen das 
BASIC ROM oder das Disketten-ROM anstelle von Block 3 eingeschaltet werden. 
Dieses Umschalten findet automatisch statt, wenn BASIC oder Firmware 
gefordert wird. Mit der zweiten RAM-Bank wird dieses Prinzip ausgeweitet, 
indem statt zwischen RAM und ROM zwischen RAM und RAM hin- und 
hergeschaltet wird. Das Umschalten wird von einem Assembler-Programm 
gesteuert. 


Auf der Seite 1 der System-Disketten finden Sie das Programm BANKMAN.BAS. 
Wird das Programm unter BASIC gestartet, setzt es den RSX-Code der 
Standard-Bank-Verwaltung ein. Deshalb wird das Programm ‘BANK 
MANAGER’ genannt. 


Die zweiten 64K kénnen benutzt werden, um Bildschirminhalte zu speichern. 
Unter solche Anwendungen fallt z.B. ein ‘Bildschirmentwurfs-Programm’, das 
verschiedene Bildschirmdarstellungen speichert, oder ein Video-Spiel mit 
verschiedenen vorbereiteten Bildern. 


Die zusatzlichen 64K kénnen auerdem als Erweiterungen des variablen 
Speichers benutzt werden, um beispielsweise den Text-Array-Platz zu erweitern, 
oder einfach als ‘RAM-Diskette’. 
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Teil 1: 
Speichern von Bildschirminhalten 


Wahlen Sie Ihren Bildschirm! 


Der BANK MANAGER kann Block 1 ausschalten und dafiir einen der vier 
Blécke aus den zusatzlichen 64K einschalten. Die Abbildung unten illustriert 
diesen Vorgang. Beachten Sie, da8 jeder Block aus den zweiten 64K an derselben 
Adresse abgelegt wird (&4000 bis &7FFF). Der Inhalt von Block 1 
(wahrscheinlich die Mitte Ihres BASIC-Programms) bleibt erhalten und kommt 
wieder an seinen alten Platz, wenn das BANK MANAGER-Programm beendet 
ist. Es sind noch drei andere Bank-Auswahlméglichkeiten vorhanden (auRer den 
unten gezeigten fiinf), aber die sind nur fir den Einsatz von CP/M Plus von 
Nutzen. 


Umschalten zwischen verschiedenen Blocken 


Der BANK MANAGER unterstiitzt zwei Befehle, mit denen zwischen 
verschiedenen Bildschirm-Inhalten hin- und hergeschaltet werden kann. Blécke 4 
bis 7 nehmen dabei nach Bedarf den Platz von Block 1 auf dem 
Speicherbelegungsplan ein. 


Kapitel 8 Seite 2 Bank Manager 


Der Befehl: 


ISCREENSWAP,,[-Bildschirm-Abschnitt> , |:Bildschirmnummer: , 
<Bildschirmnummer> 


..tauscht den Inhalt zweier Blécke aus, wahrend: 


ISCREENCOPY ,[-Bildschirm-Abschnitt> , ]:Ziel-Bildschirmnummer , 
‘Quellen-Bildschirmnummer> 


..den Inhalt eines Blockes in einen anderen kopiert. 


Der Wahl-Parameter -Bildschirm-Abschnitt gibt an, wieviele Teile eines Blockes, 
in 64stel (1/64=256 Byte von 64K) gemessen, kopiert werden sollen. Fur 
‘Bildschirm-Abschnitt> kénnen daher Werte von 0 bis 63 eingesetzt werden. 
Dieser Operations-Modus ist ntizlich, wenn neben dem Bildschirmtausch ein 
anderer Verarbeitungsprozei ablaufen soll. Ein Bildschirmwechsel dauert 
ungefahr 150/300 Sekunden (150 TIME-Einheiten). 


Die Angabe 1 fir <Bildschirm-Nummer> bezeichnet den normalen, sichtbaren 
Bildschirm, die Nummern 2, 3, 4 oder 5 stehen fir die anderen 
Bildschirmdarstellungen. SCREENCOPY und SCREENSWAP-Operationen laufen 
viel schneller ab, wenn der Quellen- oder Ziel-Bildschirm 1 ist. Achten Sie darauf, 
da der Bildschirm nicht nach oben oder unten rollt, was beim Operieren mit 
Disketten-gespeicherten Bildschirm-Kopien vorkommt. Alle Bildschirmabztge 
sollten so beschaffen sein, da Bildschirm 1 immer in_ derselben 
Hardware-Position zu sehen ist. Am einfachsten wird die Standard-Position durch 
einen MODE-Befehl festgelegt. 


Experimentieren mit den 
Bildschirmtausch-Befehlen 


Lassen Sie zunachst das BANK MANAGER-Programm von Seite 1 ihrer 
System-Disketten laufen, indem Sie eintippen: 


RUN "BANKMAN" 
Schreiben Sie nun: 


MODE 1 
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Der Bildschirm wird geldéscht. Tippen Sie: 


" Dies ist das Original-Bild 
ISCREENCOPY,3,1 'Schicke das Originalbild zu Speicherbl 
ock 3 


CLS 
Wieder wird der Bildschirm geléscht. Tippen Sie: 


' Dies ist das Ersatz-Bild 

ISCREENCOPY,2,1 ' Schicke das Ersatz-Bild nach Speicher 
block 2 

[ISCREENSWAP,2,3 ' Tausche Speicherblock 2 und Speicherb 
lock 3 aus 

ISCREENCOPY,1,3 ' Hole das Ersatz-Bild von Speicherbloc 
k 3 auf den Bildschirm 

ISCREENCOPY,1,2 ' Hole das Original-Bild von Speicherbl 
ock 2 auf den Bildschirm 


Als weiteren Beitrag zu diesem Thema werden im letzten Teil von Kapitel 9 die 
Bildschirm-Austausch-Moglichkeiten des BANK MANAGERs anhand eines 
umfassenden ‘Bildschirmentwurfs-Programms’ vorgefihrt. 


Teil 2: Pseudo-Datei-Operation 
Auf die lange Bank geschoben... 


Wenn man die gesamten zweiten 64K RAM als RAM-Diskette betrachtet, so 
bilden sie eine RAM-Datei mit einer Anzahl von gleich langen Datensatzen. Die 
Datensatzlange kann zwischen 0 und 255 Byte liegen, wobei eine Minimal-Lange 
von 2 Byte empfohlen wird. Ist die .RAM-Satzlange> einmal festgelegt, kann jeder 
Satz durch seine ‘RAM-Satznummer: aufgerufen werden. Beim Schreiben in eine 
RAM-Datei kann ohne weiteres eine andere Satzlange angegeben werden, als 
beim Lesen. 


ACHTUNG! Die RAM-Datei darf nur Daten enthalten; sie ist nicht zum 
Speichern von Programm-Anweisungen geeignet. 

Wie bei RAM-Disketten-Speicher-Systemen wblich, gilt auch hier das Prinzip der 
‘fortlaufenden Satznummern’. Damit wird automatisch immer auf die ndchste 
Satznummer zugegriffen, was besonders niitzlich ist, wenn nacheinander mit 
allen Satzen in der Datei eine Operation durchgefiihrt werden soll. 
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Der Befehl: 
({BANKOPEN,-:RAM-Satzlange> 
..Setzt alle Datensatze auf eine Lange fest, macht Satz Nummer 0 zum aktuellen 


Satz, léscht jedoch NICHTS aus dem Speicher. 
Der Befehl: 


IBANKWRITE,@-Riickkehr-Code: , :Textausdruck>[ ,.RAM-Satznummer>] 


..schreibt den -Textausdruck> in die RAM-Datei. 


Die .RAM-Satznummer> gibt an, welcher Satz geschrieben wird. Wird dieser 
Parameter ausgelassen, wird automatisch die aktuelle Satznummer 
angenommen. Danach wird der Satz mit der nachsten Nummer zum aktuellen 
Satz. 


Fullt der ‘Textausdruck> den Satz nicht ganz aus, so bleiben die Zeichen aus dem 
alten Satz am Ende bestehen, da sie nicht tiberschrieben werden. Ist der 
‘Textausdruck» langer als der Satz, so werden die tberschtissigen Zeichen 
ignoriert, damit sie keinen Platz im nachsten Satz besetzen. 


‘Riickkehr-Code ist eine ganzzahlige Variable, die die Nummer des Satzes 
wiedergibt, in den geschrieben wurde (falls die Operation erfolgreich verlief). Hat 
die Schreib-Operation aus irgendeinem Grund nicht geklappt, wird ein negativer 
Fehler-Code ausgegeben. 


-1 ‘End of file’ -Fehler. Die Adresse der geforderten Satznummer liegt 
aufferhalb der 64K. 


-2 Umschaltfehler bei der Bankauswahl. (Durfte eigentlich nicht vorkommen.) 
Beispiele: 


IBANKOPEN, 10 
IBANKWRITE,9r%,"123 probe",@ 
IBANKWRITE,ar%,wS 


Der Befehl: 
IBANDREAD ,a-Riickkehr-Code. , a:Stringvariable.[,:RAM-Satznummer:] 


..liest einen Satz von der RAM-Datei in die ‘Stringvariable:. 


Die .RAM-Satznummer> gibt an, welcher Satz gelesen werden soll. Wird der 
Parameter ausgelassen, so wird automatisch die aktuelle Satznummer 
angenommen. Danach ist der Satz mit der nachsten Nummer aktuell. 
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Wenn der Satz-Inhalt die ‘Stringvariable. nicht ganz ausfillt, bleiben alte, nicht 
tiberschriebene Zeichen am Ende der <Stringvariable> bestehen. Enthalt der Satz 
mehr Zeichen, als die <Stringvariable’ aufnehmen kann, werden die 
tiberschiissigen Zeichen nicht berticksichtigt, da es nicht mdéglich ist, die Lange 
einer Stringvariablen wahrend eines externen Befehls auszudehnen. 


‘Riickkehr-Code> ist eine ganzzahlige Variable, die die Nummer des Satzes, der 
gelesen wurde, wiedergibt (falls die Operation erfolgreich verlief). Hat die 
Lese-Operation aus irgendeinem Grund nicht geklappt, wird ein negativer 
Fehler-Code ausgegeben: 


-1 ‘End of file’-Fehler. Die Adresse der geforderten Satznummer liegt auBerhalb 
der 64K. 


-2 Umschaltfehler bei der Bankauswahl. (Dirfte eigentlich nicht vorkommen.) 
Beispiel: 


IBANKREAD,ar4,i13$,86 


Suchaktion 


Mit folgenden Befehl werden alle gespeicherten Datensatze nach einem 
bestimmten Eintrag durchsucht: 


IBANKFIND,@-Riickkehr-Code> , .gesuchter String> 
[,<erste Satznummer | , letzte Satznummer> |] 


Die <erste Satznummer> gibt an, bei welchem Satz die Suche beginnen soll. Wird 
dieser Parameter ausgelassen, wird ab dem aktuellen Satz gesucht. 


Der gesamte 64K-Speicher wird in -RAM-Satzlange>-Schritten durchgekammt, bis 
der «gesuchte String gefunden ist. 


Ist eine Jetzte Satznummer angegeben, wird die Suche abgebrochen, nachdem 
dieser Satz gepriift wurde (falls der gesuchte String nicht schon vorher gefunden 
wurde). 


War die Suche erfolgreich, wird der Satz, in dem der String gefunden wurde, zum 
aktuellen Satz. 


‘Riickkehr-Code> ist eine ganzzahlige Variable, die die Satznummer angibt, in der 
der gesuchte String gefunden wurde (falls die Operation erfolgreich verlief). 
Wurde der String aus irgendeinem Grunde nicht gefunden, wird ein negativer 
Code ausgegeben: 
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-1 ‘End of file’-Fehler. Die «erste Satznummer liegt aufSerhalb der 64K oder ist 
gréRer als die letzte Satznummer>. 


~2 Umschaltfehler bei der Bankauswahl. (Diirfte eigentlich nicht vorkommen.) 
~3 Keinen entsprechenden String gefunden 


Der <gesuchte String» darf Universalzeichen in Form von Nullen enthalten 
(CHRS$(@)). Ist der <gesuchte String» langer als die ‘“RAM-Satzlange-, werden 
zur Vergleichsoperation nur soviele Zeichen des Strings benutzt, wie die 
‘RAM-Satzlange angibt. 


Beispiele: 


IBANKFIND,adrz%z,"123 test",B 
iBANKFIND,ar%,f$,1808,200 


Offensichtliche Fehler, wie z.B. die falsche Anzahl von Parametern, werden mit 
der Meldung ‘Bad Command?’ quittiert. Jedoch werden bei externen Befehlen 
keine Fehler vom Typ ‘Type mismatch’ entdeckt, und der Benutzer mu8 
darauf achten, die richtige Form von Parametern zu verwenden. 


Im unten angegebenen Beispiel-Programm werden RAMdisc-Befehle verwendet, 
um eine Datenbank einzurichten und abzufragen, die Anagramme von 
7-Buchstaben-Wortern enthalt. Es sucht nach gleichen Wortteilen, wobei auch 
Universalzeichen eingesetzt werden kénnen. 


Bildet man z.B. Anagramme aus dem Wort FIGUREN, erhalt man sechs 
Méglichkeiten, die in das Schema ? RUNG?? (die letzten beiden ?? kénnen auch 
weggelassen werden) _passen: FRUNGIE, FRUNGEI, ERUNGIF, 
ERUNGFI, IRUNGEF und IRUNGFE. 


Ks dauert einige Zeit, bis diese Datenbank errichtet ist, aber schlieflich gilt es, 
64K Speicherplatz zu fillen! 


19 'ANAGRAMS by ROLAND PERRY 

20 ' copyright (c) AMSOFT 1985 

30 ' 

4@ ‘Vor diesem Programm das "BANKMAN" Programm lLaufen Lassen 

50 Vd KKK KKK KKK KERR KKK RIKI KK KEKE EEE KKK KEE EER EEE EKEERKEKKKKE 

66 ' 

7@ MODE 2 

80 DEFINT a-z 

90 r%=O:1BANKOPEN,7 

188 INPUT"Ein Wort mit 7 Buchstaben zum Durcheinanderschuet 
teln 

11@ IF LEN(€s$)<>7 THEN 199 
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126 PRINT'Bitte warten..." 

130 LOCATE 1,5:PRINT"Anagramm:" 

148 FOR c1=1 TO 7 

15@ FOR c2=1 TO 7 

168 IF c2=c1 THEN 3780 

178 FOR c3=1 TO 7 

188 IF c3=c2 OR c3=c1 THEN 360 

198 FOR c4=1 TO 7 

200 IF c4=c3 OR c4=c2 OR c4=c1 THEN 358 

218 FOR c5=1 TO 7 

220 IF c5=c4 OR c5=c3 OR c5=c2 OR c5=c1 THEN 340 
230 FOR c6=1 TO 7 

240 IF c6=c5 OR c6=c4 OR c6=c3 OR c6=c2 OR c6=cl THEN 3 


250 FOR c7=1 TO 7 

268 IF c7=c6 OR cf=c5 OR c7=c4 OR c7=c3 OR c7=c2 OR c7= 
c1 THEN 326 

270 o$=MID$(s$,c1,1)+MID$(s$,c2,1)4+MID$(s$,c3,1) +MID$(5 
$,04,1)+MID$(s$,c5,1)+MID$(s$,c6,1)+M1ID$(5$,c7,1) 

280 LOCATE 12,5:PRINT x;0$ 

298 IBANKWRITE,arz%,0$ 

300 IF r%<@ THEN STOP 

318 x=x+t1 

32@ NEXT c7 

338 NEXT cé6é 

346 NEXT c5 

358 NEXT c4 

36@ NEXT c3 

370 NEXT c2 

388 NEXT cl 

39@ letztersatz=r% 

400 REM Jetzt werden alle durchgegangen 

418 rZ=O8:g$=SPACES$(7) 

420 PRINT: INPUT"Welches Buchstabenschema soll das Anag 
ramm enthalten? Benutze Universalzeichen?: 

430 m$=LEFTS(m$,7) 

446 FOR x=1 TO LENC(m$) 

450 IF MIDS(m$,x,1)="7"THEN MIDS(mS,x,1)=CHRS$(O) 

460 NEXT 

476 |BANKFIND,ar24,m$,6,letztersatz 

486 IF r%<@ THEN GOTO 426 

490 |BANKREAD,ar%,g$ 

500 PRINT gS, 

518 IBANKFIND,adr%,m$,r%4+1,letztersatz 

528 GOTO 488 
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Kapitel 9: 
Wenn Sie mal Zeit haben 


Dieses Kapitel befaBt sich ganz zwanglos mit einigen 
Hintergrund-Informationen tiber Computer im allgemeinen 
und den CPC6128 im besonderen. Es ist nicht unbedingt 
erforderlich, daB Sie dieses Kapitel lesen, bevor Sie mit dem 
Computer experimentieren, es hilft Ihnen jedoch, sein 
Innenleben zu entdecken. 


Teil 1: Computer im allgemeinen... 


Selbst wenn Sie Ihren CPC6128 nur erworben haben, um sich mit 
anspruchsvollen Computerspielen zu beschaftigen, méchten Sie vielleicht einiges 
uber den Computer erfahren, was mit dem Namen ‘Hardware’ bezeichnet wird. 


Unter ‘Hardware’ versteht man alles am Computer, was man anfassen und 
wegtragen kann, z.B. die Haupttastatur des Computers, den Monitor, die 
Verbindungskabel usw. Darunter fallt im Grunde fast alles, was nicht als 
‘Software’ bezeichnet wird. ‘Software’ sind Programme, Handbiicher und der 
Inhalt von Disketten und Kassetten. 


Bestimmte Fahigkeiten von Computern werden durch die Hardware erméglicht, 
z.B. Farbdarstellungen auf dem Monitor. Es ist Aufgabe der Software, diese 
Moglichkeiten der Hardware auszunutzen, um besondere Zeichen oder Formen 
auf dem Bildschirm entstehen zu lassen. 


Die Hardware leitet den Elektronenstrahl auf die Leuchtflache innerhalb des 
Bildschirms, um ein Bild aufleuchten zu lassen. Die Software sagt der Hardware 
mit Befehlen und Informationen, wann sie was darstellen soll. Sie sorgt fur 
richtigen Zeitablauf, Steuerung und Reihenfolge, um ein startendes Raumschiff, 
oder etwas Naheliegenderes wie einen eingetippten Buchstaben auf dem 
Bildschirm erscheinen zu lassen. 


Worin unterscheiden sich Computer? 


Hardware ohne Software ist zwecklos. Software ohne Hardware ist genauso 
zwecklos. Der Computer hat erst dann einen Wert, wenn beide zusammenwirken, 
um verschiedene Aufgaben zu erfillen. Es gibt einige einfache MafSstabe, mit 
denen man die Leistung von Hardware und Software messen kann. 
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Fur die Qualitatsbewertung von Personal-Computern gelten heute allgemein 
folgende Kriterien: 


1. DIE AUFLOSUNG - Die Dichte der kleinsten erkennbaren 
Einheiten auf dem Bildschirm 


Hierbei handelt es sich um eine Kombination von Faktoren: Die Anzahl der 
Farben, die dem Programmierer zur Verfigung stehen, die Anzahl der 
Bildpunkte (Pixel) auf dem Bildschirm, und die Anzahl der Textzeichen, die in 
einem Bildschirmbereich dargestellt werden kénnen. 


Sie werden feststellen, da der CPC6128 im Vergleich mit Systemen derselben 
Preisklasse in dieser Hinsicht sehr gut abschneidet. 


2. Der BASIC-INTERPRETER 


Fast alle Heimcomputer sind mit einem BASIC-Interpreter ausgestattet, der es 
dem Benutzer erlaubt, Programme zu schreiben, um die Hardware-Méglichkeiten 
zu nutzen. Die eingebaute Programm-Sprache BASIC, die mit Ihrem Computer 
geliefert wurde, ist selbst ein Programm - ein enorm kompliziertes und 
verwickeltes Programm, das sich durch die Erfahrung von wber einer Million 
Mann-Jahren entwickelt hat, seit BASIC in den USA erfunden wurde. BASIC 
(Abkirzung fiir: Beginners All-purpose Symbolic Instruction Code) ist sicher die 
in der Welt am weitesten verbreitete Computersprache, und wie jede Sprache 
weist sie eine Vielzahl lokaler ‘Dialekte’ auf. 


Die mit dem CPC6128 gelieferte BASIC-Version ist einer der kompatibelsten 
BASIC-Dialekte. Mit ihr kénnen auch Programme gesteuert werden, die fiir den 
Betrieb unter Einsatz des CP/M Disketten-Betriebssystems geschrieben wurden. 
Diese BASIC-Version ist sehr schnell, d.h. sie fiihrt ihre Rechnungen sehr schnell 
aus. Es ist Ihnen vielleicht egal, ob ein Computer 0,05 Sekunden oder 0,075 
Sekunden bendtigt, um 3 mal 5 auszurechnen und anzuzeigen, wenn aber ein 
Programm eine Graphik erstellen soll und daftr tausende von einfachen 
wiederkehrenden Rechnungen durchfihren mu, summiert sich der Unterschied 
zwischen 0,05 und 0,075 Sekunden zu einer betrachtlichen Leistungsdifferenz. 


Haufig werden Sie dem Begriff ‘Maschinencode’ begegnen. Maschinencode ist die 
Form des Befehlscodes, die an den Prozessor weitergegeben wird. Der Prozessor 
braucht weniger Zeit, um herauszufinden, was er tun soll, und kann deshalb eine 
Anweisung in Maschinencode 5 bis 15 Mal schneller ausfiihren, als eine 
Operation, die uber den BASIC-Interpreter lauft. Andererseits kann es 5 bis 50 
Mal mehr Zeit in Anspruch nehmen, ein Programm in Maschinencode zu 
schreiben, als das Schreiben desselben Programms in BASIC samt Ausfiihrung 
dauern wiirde. 
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Die BASIC-Version in Ihrem Schneider-Computer gehort zu den schnellsten und 
leistungsfahigsten, die in Heimcomputern zu finden sind. Sie besitzt eine Vielzahl 
von Eigenschaften, die es dem erfahrenen BASIC-Programmierer erleichtern, 
einige der systembedingten Nachteile eines hochentwickelten Sprach-Interpreters 
zu tberwinden, um erstaunlich dynamische visuelle und musikalische Effekte zu 
erzeugen. 


3. ERWEITERUNGSFAHIGKEIT 


Bei den meisten Computern wird auf erforderliche zusatzliche Hardware-Gerate 
verwiesen, wie Drucker, Joysticks, zusatzliche Diskettenlaufwerke. 
Paradoxerweise braucht man bei einigen der erfolgreichsten Heimcomputer 
zusatzlich noch sogenannte ‘Erweiterungsschnittstellen’, bevor auch nur ein 
einfacher Drucker oder Joystick angeschlossen werden kann. 


Nicht jeder Kaufer denkt an seine zuktinftigen Bediirfnisse; im Endeffekt kann es 
daher giinstiger sein, ein Gerat zu kaufen, das Anschlisse fiir einen geeigneten 
(Centronics-kompatiblen) Drucker und einen Joystick besitzt. 


Der CPC6128 besitzt einen eingebauten Anschlu8 fir einen Centronics-Drucker, 
einen Anschlu8 fiir ein zusatzliches Diskettenlaufwerk, eine Anschlu8buchse fir 
Kassettenbetrieb, Anschlu8méglichkeiten fiir bis zu zwei Joysticks, einen 
Stereo-Tonausgang sowie einen umfassenden Erweiterungs-Bus zum Anschlu8 
einer seriellen Schnittstelle (RS232), eines MODEMs, eines Sprachsynthesizers, 
eines Lichtgriffels usw. 


4. TONQUALITAT 


Die akustischen Qualitaten eines Computers entscheiden, ob sich die erzeugten 
Tone wie ein Brummer in einer Blechdose anhoren, oder ob sie wie aus einem 
elektronischen Musikinstrument klingen. 


Der CPC6128 arbeitet mit einem Tongenerator mit drei Kanalen, der Tonumfang 
betragt acht Oktaven. Uber die Steuerung von Amplitude und Hillkurven wird 
so eine 4uBerst ansprechende Musikqualitat erreicht. Dariiberhinaus besitzt der 
6128 auch Stereo-Eigenschaften, indem ein Kanal der linken und ein Kanal der 
rechten Seite zugeordnet wird, wahrend der dritte Kanal in der Mitte bleibt. 


Mit diesen Méglichkeiten lassen sich Tone und Gerausche als Kulisseneffekte in 
Programme einbauen, die simultan zur Bewegung auf dem Bildschirm verlaufen. 


Letztendlich miissen Sie als Benutzer selbst entscheiden, welche Eigenschaften 
eines Computers Ihnen am wichtigsten sind. Wir hoffen, dafi Sie alles 
ausprobieren, um die Méglichkeiten Ihres Computers optimal zu nutzen. 
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Warum geht das nicht? 


Von Computer-Neulingen wird in Anbetracht der Leistungsfahigkeit der 
modernen Technologie oft die Frage gestellt, warum selbst ein so 
hochentwickeltes Gerat wie der 6128 offenbar nicht in der Lage ist, die Art von 
Bildern auf den Bildschirm zu bringen, die jedes Fernsehgerat produziert. Es wird 
z.B. gefragt, weshalb der Computer keine Figur mit natirlichen Bewegungen 
tiber den Bildschirm laufen lassen kann, und warum alle Figuren wie 
Strichmannchen mit ‘Charly Chaplin-Bewegungen’ aussehen. 


Die Anwort ist einfach und schwierig zugleich. Die einfache Antwort ist, da Sie 
sich nicht dazu verleiten lassen diirfen zu glauben, dai der Bildschirm des 
Computers ein ebenso kompliziertes Gebilde ist wie ein Fernsehschirm. Kin 
Fernseher arbeitet mit ‘linearen’ Informationen, die nahezu unendlich viele 
Abstufungen zwischen hell und dunkel durch das gesamte Farbspektrum 
erméglichen. Der Bildschirmspeicher fiir ein Fernsehbild mute, so gesehen, 20 
mal gréBer sein als der Speicher fiir ein Computer-Bild. 


Dies ist nur eine Seite des Problems. Um dieses Bild in Bewegung zu setzen, 
mtBte dieser enorme Speicher-Inhalt in hohem Tempo verarbeitet werden (ca. 50 
mal pro Sekunde). Dies ist méglich - aber nur mit Maschinen, die einige 
tausendmal teurer sind als ein Heimcomputer - wenigstens vorlaufig. 


Bis die Kosten fiir Hochgeschwindigkeitsspeicher drastisch fallen (und das 
werden sie irgendwann), miissen Kleincomputer mit verhaltnismafig wenig 
Speicher auskommen, um den Bildschirm zu steuern. Dies bedeutet aber 
niedrigere Auflésung und zackige Bewegungen. Uberlegte Hardware-Planung 
und gute Programmierung kénnen viel dazu beitragen, das beste aus dieser 
Situation zu machen, aber wir sind noch weit davon entfernt, auf billigen 
Computern flieBende Bewegungen und realistische Bilder darzustellen, die 
wenigstens Zeichentrickfilm-Qualitat erreichen. 


Die Tastatur kommt mir bekannt vor... 


Warum kann ich nicht einfach zum Computer gehen und eine Seite Text in die 
Maschine tippen? 


Lassen Sie sich nicht durch die Tatsache irrefiihren, da} der Computer wie eine 
Schreibmaschine mit elektronischer Anzeige aussieht. Der Bildschirm ist kein 
‘elektronisches Blatt Papier’, sondern eine ‘Befehlskonsole’, d.h. er gibt Innen nur 
die Moglichkeit, mit der Programmiersprache und den Programmen im 
Computerspeicher Kontakt aufzunehmen. 
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Solange Sie ihm nichts anderes sagen, versucht der Computer, samtliche Zeichen, 
die Sie eintippen, als Programm-Anweisungen zu interpretieren. Wenn Sie auf 
[RETURN] dricken, sieht sich der Computer an, was Sie eingetippt haben, und 
wenn es fiir sein eingebautes BASIC keinen Sinn ergibt, weist er die ‘Eingabe’ 
mit dem Kommentar Syntax error zuriick. 


Wenn Sie aber gerade ein Textverarbeitungs-Programm im Speicher haben, 
diirfen Sie beliebig Worter eintippen, auf [RETURN] driicken und weitermachen, 
als ob Sie tatsachlich mit einer elektronischen Schreibmaschine auf ein 
elektronisches Blatt Papier schreiben wirden. Doch dazu mu erst ein 
Textverarbeitungs-Programm in den Computerspeicher geladen werden. 


Der Computer scheint mehrere Geratekomponenten zu vereinen, die zu Hause 
und im Biro bekannt sind, z.B. den Fernseher-ahnlichen Bildschirm und die 
Tastatur. Sie mtissen sich jedoch bewuft machen, da diese Ahnlichkeiten nur 
oberflachlicher Natur sind, und da& der Computer zwar eine Kombination 
vertraut aussehender Hardware darstellt, jedoch eine ganz eigene Persénlichkeit 
hat! 


Desa 
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Wer hat Angst vor der Fachsprache? 


Wie in allen Spezialbereichen hat sich auch in der Datenverarbeitung eine eigene 
Fachsprache entwickelt, eine Art Kurzschrift fiir die Ubermittlung komplizierter 
Begriffe, die sonst viele ‘Klartext’-Worte in Anspruch nehmen wiirden. Es sind 
nicht nur die hochtechnisierten Arbeitsgebiete, die sich hinter einer Mauer von 
Schlagwortern und fachsprachlichem Kauderwelsch verbergen. Die meisten 
Berufe und Arbeitsgebiete haben ihre eigene Sprache, mit der wohl jeder schon zu 
kampfen hatte. 


Der grote Unterschied zwischen der Sprache der Datenverarbeitung und 
beispielsweise der Juristensprache besteht darin, da8 in der Juristensprache die 
Satzkonstruktionen kompliziert sind, wahrend in der Datenverarbeitung die 
Worter an sich das Haupthindernis zum Verstandnis darstellen. Die Leute, die 
sich in der Terminologie der Datenverarbeitung auskennen, bemithen sich, diese 
Begriffe in einen klaren Zusammenhang zu stellen, um Mifiverstandnisse in der 
Kommunikation so weit wie modglich auszuschalten. Lassen Sie sich durch die 
‘einfache Sprache’ der Datenverarbeitung nicht tauschen: Sie hat nichts mit 
Literatur zu tun, sondern mit praziser Wissenschaft. Die Begriffe sind schwer zu 
verstehen, die Kommunikationsstruktur jedoch ist sehr einfach und nicht im 
mindesten verwirrend oder widerspriichlich. 


Im Informatik-Unterricht werden Programme noch nicht nach kinstlerischen 
Mafstaben bewertet.Trotzdem sticht sofort ins Auge, ob ein Programm elegant 
oder uniibersichtlich aufgebaut ist, auch wenn der Zweck des Programms nicht 
auf Anhieb klar zu erkennen ist. Heute wird wesentlich mehr Wert auf 
ordentlichen Programmaufbau gelegt, als es im allgemeinen Wirbel am Anfang 
der Micro-Revolution tiblich war. 


Viele junge Leute lernen schnell, mit dem Computer umzugehen, da sie fiir die 
Genauigkeit und Einfachheit der Ideen und fiir die Art der Kommunikation ein 
Gespuir haben. Man wird kaum einen zehnjahrigen Juristen finden - aber es gibt 
sehr viele zehnjahrige Programmierer! 
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Die Basis des BASIC 


Fast alle Heimcomputer arbeiten mit BASIC, einer Programmiersprache, die der 
normalen (englischen) Sprache am nachsten kommt. Der Name BASIC sagt heute 
nichts mehr tiber den Schwierigkeitsgrad aus: Viele sehr komplexe und 
leistungsfahige Programme werden in BASIC geschrieben. 


Ks kann aber nicht daran gezweifelt werden, da der Name BASIC viele 
Anfanger fiir sich gewonnen hat, da er in dem Wirrwarr der vielen vorhandenen 
Programmiersprachen vielversprechender klingt. Dies hat wahrscheinlich zu der 
weiten Verbreitung von BASIC gefiihrt. 


BASIC ist eine Computersprache, die eine Anzahl zulassiger Befehle 
interpretiert, und dann wahrend des Programmablaufs Operationen an Daten 
durchfihrt. Im Gegensatz zum menschlichen Wortschatz, der 5000 bis 8000 
Worter umfaft, kommt BASIC mit ungefahr 200 Wértern aus. Der Einsatz dieser 
Worter in einem Programm unterliegt strengen Regeln. Die Syntax mu8 genau 
eingehalten werden, und jeder Versuch, eine andere Schreibweise oder Sprache zu 
verwenden, endet mit der kalten und niichternen Meldung: 


Syntax error 


Dies ist nicht so einschrankend, wie es auf den ersten Blick erscheint, da die 
BASIC-Sprache (die Syntax) in erster Linie fiir die Bearbeitung numerischer 
Daten gedacht ist. Die Worte stellen im wesentlichen nur Erweiterungen der 
bekannten mathematischen Operatoren wie + und - dar. Die wichtigste 
Tatsache, die ein Anfanger begreifen mui, ist die, da8 der Computer nur mit 
numerischen Daten arbeiten kann, da jede Information nur in der Form von 
numerischen Daten an die Zentral-EKinheit (CPU = Central Processor Unit) 
ubergeben werden kann. 


Zahlen bitte! 


Wiirde der Computer dazu benutzt, Goethes gesammelte Werke zu speichern, so 
ware im ganzen System kein einziger Buchstabe und kein einziges Wort zu 
finden. Jedes Stiick der Information wird erst in eine Zahl umgewandelt, bevor 
der Computer mit ihm arbeiten kann. 


BASIC tibersetzt die Worte in Zahlen, die der Computer dann mit Mitteln der 
Addition, Subtraktion und der Boole’schen Logik bearbeitet. Bei Boole’schen 
Operationen werden Daten verglichen und Attributen zugeordnet. Es wird z.B. 
geprift, ob eine Zahl gréfer als eine andere ist, und wenn eine Zahl eine 
gegebene Voraussetzung erfwllt, wird ein bestimmter Ablauf eingeleitet. 


Mit Hilfe des Programms zerlegt der Computer jede Aufgabe in eine Serie von 
einfachen Ja/Nein-Operationen. 
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Wenn Ihnen dieser Proze umstandlich vorkommt, haben Sie recht, und die erste 
und wichtigste Wahrheit der Datenverarbeitung erkannt. Ein Computer ist ein 
Werkzeug zur Ausfiihrung allereinfachster, immer wiederkehrender Aufgaben 
-sehr schnell und absolut prazise. BASIC interpretiert also die in einem 
Programm enthaltenen Anweisungen und wandelt sie in eine Sprache 
(Maschinencode) um, die von der Zentraleinheit verstanden wird. Der Computer 
versteht nur zwei Zustande: ‘Ja’ und ‘Nein’, die in binarer Schreibweise mit 1 und 
0 dargestellt werden. In der Boole’schen Logik gibt es nur ‘wahr’ und ‘falsch’, kein 
jein’ oder ‘vielleicht’! 

Das Umschalten zwischen diesen beiden bestimmten Zustanden bildet den Kern 
des Begriffs ‘digital’. In der Natur verlaufen die meisten Prozesse allmahlich und 
geradlinig von einem stabilen Zustand zu einem anderen; der Ubergang verlauft 
langsam uber eine Verbindungslinie zwischen den beiden Zustanden. In einer 
idealen digitalen Umgebung dagegen wird buchstablich in Null-Komma-Nichts 
von einem Zustand auf einen anderen umgeschaltet. In Wirklichkeit verursachen 
die Grenzen der Halbleiter-Physik jedoch eine minimale Verzégerung, die 
sogenannte Laufzeitverzégerung. Die Summe vieler Laufzeitverzégerungen sind 
der Grund, weshalb es etwas Zeit braucht, bis die Information verarbeitet ist und 
die Antwort ausgegeben wird. 
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In jedem Fall muf§ der Computer eine bestimmte Zeit warten, bis eine Aufgabe 
fertig ist und er deren Ergebnis fiir die nachste Operation verwenden kann. In 
einer idealen Umgebung miiBte also eine kiinstliche Verzégerung eingebaut 
werden. Der digitale ProzeS kennt mur schwarz und wei; die 
dazwischenliegenden Grauténe sind bedeutungslos. Der lineare oder ‘analoge’ 
Ubergang hingegen fiihrt tiber alle Grauténe. 


Da die letztendliche Antwort nur 0 oder 1 lauten kann, gibt es kein ‘fast richtig’. 
Daf der Computer manchmal scheinbar Fehler bei Operationen mit numerischen 
Daten macht, hangt damit zusammen, da8 er nur Zahlen bis zu einer bestimmten 
GroRe verarbeiten kann. Numerische Daten, die diese Grenze iberschreiten, 
werden abgeschnitten oder gerundet, damit sie in den verfiigbaren Platz passen. 
Beispielsweise wird 999,999,999 zu 1,000,000,000. 


Wie kann man nun in einer Welt, die nur 0 und 1 kennt, weiter als bis 1 zahlen? 


Bits und Bytes 


Wir haben uns zufallig daran gewodhnt, mit Zahlen des Dezimalsystems 
umzugehen, in dem der Bezugspunkt die Zahl 10 ist, d.h. zur Darstellung von 
Mengen zwischen 0 und 9 (0 bis 9 ist der Schreibweise 1 bis 10 vorzuziehen) 
stehen uns zehn Ziffern zur Verfiigung. Das Zahlensystem mit zwei Ziffern (0 und 
1) hei8t Dualsystem oder Binarsystem, und die Einheiten, mit denen das System 
arbeitet, heiBen Bits (Abk. fiir Binary diglIT). 


Der Zusammenhang zwischen Bits und der dezimalen Schreibweise ist leicht zu 
verstehen: 


Normalerweise wird die maximale Anzahl der verwendeten Binarziffern in einer 
Zahl angegeben, indem soviele Nullen vorangestellt werden, daB die Bit-Anzahl 
vollstandig ist. 


Aus der Dezimalzahl 7 wird: 
00111 
..in 5-Bit-Schreibweise. 


Die Ziffern im Binarsystem kénnen einfach als Indikatoren angesehen werden, 
die fiir ihre Spalte angeben, ob eine bestimmte Potenz von 2 gegeben ist. 1 = ja; 0 
= nein 


99= 1 A aie 
9'=9=9=9(9°) : 
97=4>=2x2=2(2') 

23=8=2x2x2=2(27) 

2*=16=2x2x2x2=2(2?) 
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Die Spalten kénnen wie folgt aussehen: 
Yi 3 2 ot 2° 


1 0 0 
(6 +0 + 0 + 2 + 1)=19 

Acht Bits, also acht Einheiten einer Binarzahl, werden als Byte bezeichnet. Die 
héchste Zahl, die in einem Byte gespeichert werden kann, ist (binar) 11111111 
-oder dezimal 255. Das ergibt 256 echte Variationen, einschlieBlich 00000000 


(auch ein zulassiger Datenwert fiir den Computer). 


Computer behandeln Daten als Vielfache von 8 Bits. 256 ist keine sehr grofe 
Zahl, so daB zur Adressierung des Speichers zwei Bytes verwendet werden. Der 
Speicher kann als Bereich mit einer horizontalen und einer vertikalen Achse 
betrachtet werden, in dem jedes Element lokalisiert werden kann. 


Der abgebildete Bereich kann bis zu 10x10 Informationseinheiten aufnehmen, 
deren Adressen die Zahlen 0 bis 9 enthalten. Auf der Position 3,5 ist die 
Information 1 gespeichert, ebenso auf der Position 5,5. 


Ein Bereich von 256 x 256 Einheiten kann 65.536 Einzelpositionen enthalten, die 
mit 8-Bit-Adressen fiir die waagrechten und senkrechten Achsen angesprochen 
werden. Mit ‘0’ und ‘1’ kénnen wir also immerhin 65.536 Elemente addressieren. 
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Die nachstgréBere bindre Einheit heifit Kilobyte (kByte oder einfach K). Ein 
Kilobyte hat 1024 Bytes. 1024 ist das bindre Vielfache, das der Dezimaleinheit 
‘Kilo’ (1000) am nachsten kommt. Dies erklart, warum ein Computer mit einem 
‘64K’-Speicher im Wirklichkeit mit 65.536 Bytes (64x1024) ausgestattet ist. 


Gliicklicherweise fihrt BASIC alle notwendigen Umformungen fir Sie durch, und 
Sie kénnen ein fahiger Programmierer werden, ohne das Binarsystem vollstandig 
zu durchschauen. Das Verstandnis des Binarsystems wird Ihnen jedoch helfen, die 
Bedeutung der ‘magischen’ Zahlen zu erfassen, die unvermeidlich auftauchen 
werden, wenn Sie sich intensiver mit der Datenverarbeitung beschaftigen. 


Es lohnt sich, die Muhe aufzuwenden, um das Bindrsystem und verschiedene 
wichtige Zahlen wie 255, 1024 usw. zu verstehen, da es sehr unwahrscheinlich ist, 
da8 sich diese grundlegende Arbeitsweise von Computern in absehbarer Zeit 
andern wird. Die Zuverlassigkeit und Einfachheit, die sich aus der Arbeit mit nur 
zwei Zustanden ergibt, wird der weitaus gré8eren Komplexitat, die jedes andere 
Zahlensystem mit sich bringt, auf jeden Fall vorzuziehen sein. 


Aber... 


Die binare Schreibweise ist denkbar einfach und elegant, aber sie ist aufwendig 
zu schreiben und fihrt leicht zu Ungenauigkeiten, da sie nicht leicht zu lesen ist. 
Deshalb werden neben dem Binarsystem einige verwandte Zahlensysteme 
verwendet, die dem Programmierer sozusagen als Kurzschrift dienen. Eines 
dieser Zahlensysteme, das vor allem bei Mikro-Computern eingesetzt wird, heift 
HEX (Kurzform von Hexadezimalsystem). 


Die Basiszah! in Hex ist 16, d.h. die Zahlen 0 bis 15 werden mit einem einzigen 
Zeichen dargestellt: 


Dezimal 


012 3 45 67 8 9 10 11 12 13 14 15 


Hex 


01234567829 A BB CODE F 


Das Hexadezimalsystem kann die acht Bits eines Bytes in zwei Blécke zu je vier 
Bits aufteilen, da 15 eine 4-Bit-Zahl ist: 1111 binar. Der erste Block enthalt die 
Anzahl kompletter ‘l5er’-Einheiten, der zweite Block enthalt den Divisionsrest 
-hier kommt die ganze Eleganz der Binar- und Hex-Systeme zum Tragen. 


Wenn Sie mal Zeit haben Kapitel 9 Seite 11 


Hier noch einmal die Tabelle zur Einfiithrung in die Binar-Schreibweise: 


Hexadezimal 


WOOADNLWNrK © 


0 
1 
2 
3 
4 
5 
6 
7 
8 
9 
A 
B 
C 
D 
E 
F 
1 


0 


Eine 8-Bit-Zahl, z.B. 11010110 (&D6 hex), kann in zwei 4-Bit-Zahlen, sogenannte 
Halbbytes, unterteilt werden. In diesem Handbuch werden Hex-Zahlen immer 
durch ein ‘&’-Zeichen kenntlich gemacht. Das Hex-System wird auch von den 
meisten Programmierern fir Assembler-Programme benutzt. Ein Programm in 
Assembler-Sprache kommt einem Maschinencode-Programm am nachsten, da 
hierbei mnemonische Symbole zur Bezeichnung von Maschinencode-‘Nummern’ 
verwendet werden. 


Wenn Sie eine Hex-Zahl lesen, stellen Sie anhand der ersten Ziffer fest, wieviel 
mal die 16 darin enthalten ist. Dann addieren Sie den Rest, der in der zweiten 
Halfte der Hex-Zahl angegeben ist, und erhalten so den Dezimalwert der Zahl. 
Man ist nur allzu leicht geneigt, z.B. die Zahl &D6 als 13+6 = 136 zu 
interpretieren. Richtig umgewandelt lautet die Zah] aber (13x16)+6 = 214. 


Genauso verhalt es sich beim Dezimalsystem: Die Zah] 89 z.B. bedeutet (8x10)+9. 
Die Multiplikation mit 10 kommt Ihnen einfacher vor, weil Sie viel mehr Ubung 
damit haben als mit 16. 
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Wenn Sie soweit gekommen sind, ohne allzu verwirrt zu sein, haben Sie schon 
eine gute Vorstellung davon, wie ein Computer funktioniert. Und wenn Sie sich 
fragen, wozu das alles - haben Sie recht. Ein Computer ist eine Maschine, die mit 
ganz simplen Konzepten und Prinzipien arbeitet. Das einzig bemerkenswerte 
daran ist, daB er seine Aufgaben mit unglaublich hoher Geschwindigkeit 
bewAaltigt (in Millionsteln von Sekunden), und eine enorme Fahigkeit hat, sich 
sowohl die eingegebenen Daten als auch die Zwischenergebnisse von Tausenden 
von Einzelrechnungen auf dem Weg zum Endergebnis zu merken. 


Wenn Sie sich weiter in die Computer-Theorie vertiefen méchten, kénnen Ihnen 
Tausende von Bichern weiterhelfen. Einige werden Sie nur verwirren, andere 
werden Sie sehr viel weiterbringen und Ihnen enthiillen, wie schlicht und einfach 
die grundlegenden Zusammenhange zwischen Zahlensystemen und der 
Arbeitsweise Ihres Computers sind. 
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Teil 2: 
..aer CPC6128 im besonderen 


Dieser Abschnitt behandelt einige maschinenspezifische 
Aspekte des CPC6128. Hintergrund-Informationen zu diesen 
Sachgebieten finden Sie sowohl im einfiihrenden 1. Kapitel, 
als auch im 38. Kapitel tiber die Schneider 
CPC6128-BASIC-Schlisselworter. 


Behandelte Themen dieses Abschnitts: 


Zeichensatz 

ASCII 

Variablen 

Logik 

Benutzer-definierte Zeichen 
Druckformatierung 
Windows 

Unterbrechungen 

Daten 

Tonerzeugung 

Graphik 

Graphik unter Verwendung des zweiten 64k-Speichers 


>t tt >t >t OE OE OE EOE OE 


Zeichensatz 


Wenn Sie die Tasten auf Ihrem 6128 dricken, sollten Sie es nicht als 
Selbstverstandlichkeit betrachten, da8 auf dem _ Bildschirm erkennbare 
Buchstaben und Zeichen erscheinen. Wie wir bereits ausgefiihrt haben, handelt es 
sich beim Computer schlieBlich nicht um eine Schreibmaschine. Tatsachlich 
werden beim Druck auf eine Taste eine Reihe kombinierter Schalter betatigt. 
Dadurch werden elektrische Impulse ausgelést, die von den Schaltkreisen im 
Computer in ein Punktmuster auf dem Bildschirm umgesetzt werden. 
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Wir identifizieren dieses Muster als einen Buchstaben, eine Zahl oder irgendein 
anderes Zeichen aus dem Zeichensatz des 6128. 


Ein Teil der Zeichen, die der 6128 produzieren kann, kommt nicht durch einen 
einfachen Tastendruck zustande, sondern wird nur durch den _ Befehl 
PRINT CHR$(-Zahl]>) angezeigt. Das kommt daher, daf jede Information in 
einer Dateneinheit, Byte genannt, gespeichert wird. Wie bereits im 1. Teil dieses 
Kapitels beschrieben, kann ein Byte einen von 256 méglichen Werten darstellen. 
Da der Computer mindestens ein ganzes Byte zum Speichern eines Zeichens 
bendtigt (dies ist der kleinste Wert, den der Computer aufnimmt, ob es uns gefallt 
oder nicht), kénnen wir ebensogut 256 Zeichen bilden, statt uns mit den ca. 96 
Standardzeichen zu begntigen, tiber die die meisten Schreibmaschinen verfigen, 
und 160 Moglichkeiten ungenutzt zu lassen. 


Die Standardzeichen aus dem Zeichenvorrat werden als ‘Untermenge’ bezeichnet. 
Sie ist tiberall in der Computerwelt als ASCII-Zeichensatz bekannt (ASCII steht 
fur ‘American Standard Code for Information Interchange’). Es ist in erster Linie 
ein Code, der dafiir sorgt, da Daten bei der Ubertragung von einem Computer 
zum anderen ihre Form behalten. Im Kapitel 7 sind die ASCII-Zeichen, sowie die 
zusatzlichen 6128-spezifischen Zeichen, mit Angabe ihrer Code-Nummern 
aufgelistet. 


Wie gehen wir am besten vor? 


Mittlerweile ist Ihnen dieses Programm wahrscheinlich nicht mehr vollkommen 
unverstandlich: 


1@ FOR n=32 TO 255 
28 PRINT CHR$(n); 
30 NEXT 


Es fiuhrt den gesamten Zeichensatz auf. Was bedeutet dieses Programm nun im 
einzelnen? 


Zunachst ist festzustellen, daf der Computer nicht angewiesen wurde: 
PRINT "abcdefghijklmn..." sondern: PRINT CHR$(n). n ist dabei 
eine Variable. Eine Variable ist eine Informationseinheit, deren Wert den 
Anweisungen des Programms entsprechend variiert. 


Die Wahl des Buchstaben n in diesem Fall ist rein zufallig. Es kann stattdessen 
jeder andere Buchstabe oder eine Buchstabenfolge eingesetzt werden, solange es 
sich nicht um ein Schlusselwort handelt. 
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Woran erkennt man eine Variable? 


Eine Zahl wie 5 hat einen festen Wert. Sie hat einen festen Platz (zwischen 4 und 
6) und ist deshalb unveranderlich. Der Buchstabe n hat auch einen festen Platz 
-im Alphabet. 


Wie erkennt der Computer den Unterschied? Ware der Buchstabe n als 
alphabetisches Zeichen erklart worden, so hatten wir n in Anfiihrungszeichen 
eingeschlossen (‘n’) und der Computer hatte mit der Fehlermeldung Syntax error 
reagiert, da er die Anweisung FOR "n"=32 TO 255 nicht versteht. 


Einfach durch die Tatsache, da8 n ohne Anfihrungszeichen erschien, wurde dem 
Computer mitgeteilt, daB es sich dabei um eine Variable handelt. In einer 
Anweisung mit FOR muf nach dem Schliisselwort eine Variable stehen, deshalb 
betrachtet der Computer das, was auf FOR folgt, als Variable. 


Wir haben dem Computer fernerhin mitgeteilt, da8 n=32 bis (TO) 255 ist. 
Somit haben wir den Bereich der Variablen festgelegt. Es handelt sich tatsachlich 
um eine Zahlenfolge, die mit 32 beginnt und mit 255 endet. 


Nachdem die Variable definiert ist, mu dem Computer gesagt werden, was mit 
ihr geschehen soll. Dies steht in Zeile 20: 


28 PRINT CHR$(n); 


Die Anweisung bedeutet, da der Computer unabhangig vom laufenden 
numerischen Wert von n in seinem Speicher nachzusehen hat, welche 
Zeichennummer diesem Wert entspricht und das zugehérige Zeichen auf dem 
Bildschirm wiedergeben soll. 


Das Semikolon am Ende von Zeile 20 verhindert, da nach jedem Zeichen, das 
angezeigt wird, eine neue Zeile angefangen wird. Ansonsten wird jedes Zeichen in 
der ersten Spalte einer neuen Zeile ausgedruckt. 


Nachdem die Anweisung von Zeile 20 mit dem ersten Wert der Zahlenfolge von n 
(ndmlich 32) durchgefiihrt wurde, wird der Computer in Zeile 30 angewiesen, zu 
der Zeile zuriickzukehren, in der sich das FOR befindet, um dieselbe Aufgabe mit 
dem nachsten Wert von n durchzufiihren. Diesen wiederkehrenden Vorgang 
nennt man Schleife (engl. loop). Schleifen gehéren zu den wichtigsten und 
fundamentalsten Bestandteilen von Programmen. Sie ersparen das Schreiben 
vieler wiederkehrender Programmteile, und Sie werden diese Technik bald 
schatzen lernen, wenn Sie selber Programme schreiben. 
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Wenn die FOR NEXT-Schleife ihren Grenzwert (255) erreicht hat, ist die 
Operation ausgefiihrt, und der Computer sucht nach der Zeile, die auf 30 folgt. Es 
liegt jedoch keine weitere Anweisung mehr vor. Also beendet er das Programm 
und kehrt zum Direktmodus zuriick, d.h. auf dem Bildschirm erscheint Ready. 
Dies ist ein Bereitschaftszeichen (auch ‘Prompt’ genannt), mit dem der Computer 
signalisiert, daB er auf weitere Anweisungen wartet. Sie kénnen nun z.B. RUN 
eintippen, und das Programm noch einmal von vorne ablaufen lassen. Das 
Programm ist sicher im Speicher verwahrt, bis Sie es durch einen Befehl léschen 
oder den Computer abschalten. 


Dieses Programm illustriert einen wesentlichen Aspekt tber das Arbeiten mit 
Computern, da namlich alles, was der Computer tut, tber Zahlen lauft. Der 
Computer hat das Alphabet - und eine ganze Reihe anderer Zeichen -ausgedruckt, 
indem er jeweils eine Zahl fiir das gewiinschte Zeichen benutzt hat. Wenn Sie die 
A-Taste driicken, sagen Sie dem Computer nicht, da8 er A auf dem Bildschirm 
darstellen soll, sondern Sie beauftragen ihn, in seinem Speicher die numerische 
Information zu suchen, die das A auf den Bildschirm bringt. Die Stelle im 
Speicher, wo sich diese Information befindet, ist durch den Zahlencode definiert, 
der durch das Driicken der Taste aktiviert wird. Jedem Zeichen ist eine Nummer 
zugeordnet; eine Liste aller Zeichen und der zugehérigen Nummern finden Sie im 
3. Teil von Kapitel 7. 


In gleicher Weise wird auch der dargestellte Buchstabe nicht auf den Bildschirm 
‘geschrieben’; es lauft alles tber Nummern. 


Der ASCII-Code fir den Buchstaben A beispielsweise ist 97. Der Computer 
versteht aber auch 97 nicht (dieses bléde Ding!). Die uns verstandliche 
Dezimalzahl mu erst in einen Maschinen-Code umgesetzt werden. Das 
Grundprinzip des Maschinen-Codes wurde weiter vorn in diesem Kapitel 
erlautert. 


Anfangs fallt es uns sehr schwer, Zahlen von der gewohnten Dezimalschreibweise 
in Hexadezimalzahlen umzuwandeln. Das Dezimalsystem ist fur uns so naturlich, 
da8 uns die Arbeit mit einem anderen System 4hnlich ungewohnt vorkommt, als 
muften wir beim Essen plétzlich Messer und Gabel in der anderen Hand halten. 


Es erfordert ein wenig Ubung, sich mit der Hex-Schreibweise zurechtzufinden, 
aber wenn Sie es erst einmal geschafft haben, wird Ihnen manches leichter fallen 
und verstandlicher werden. Wenn Sie das Binar- und Hexadezimalsystem noch 
nicht richtig verstanden haben, empfehlen wir Ihnen, Teil 1 dieses Kapitels noch 
einmal durchzuarbeiten. 


Wenn der Computer den Anschlag der A -Taste in eine fiir ihn verstandliche Zahl 
umgesetzt hat, aktiviert er den Teil seines Speichers, der mit dieser Zahl 
angesprochen wird. Dort befindet sich eine Serie von Zahlen, die das A -Zeichen 
definieren. Das Zeichen, das dann auf dem Bildschirm erscheint, ist aus einem 
Datenblock zusammengesetzt, der im Speicher als numerische Matrix abgelegt 
ist. 
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enum 


Matrix (Raster) fur Kleines a GroBes A 
ein Leerzeichen 


Die Matrix besteht aus Spalten und Zeilen fiir Punkte. Ein Zeichen wird 
dargestellt, indem das erforderliche Punktmuster aufleuchtet. Jeder Punkt wird 
durch Daten im Computer-Speicher gesteuert. Beim CPC6128 hat die Matrix oder 
‘Zelle’ jedes Zeichens acht Zeilen und acht Spalten. Méchten Sie ein Zeichen 
darstellen, das im Zeichenvorrat des Computers nicht enthalten ist, haben Sie die 
Moglichkeit, mit Hilfe des Befehls SYMBOL selbst ein Zeichen zu definieren. Wie 
Sie das anstellen, wird einige Seiten weiter beschrieben. 


Um ein Zeichen selbst zu definieren, kénnen Sie zwischen 0 und 64 Zeichen 
beliebig kombinieren und anordnen. Der ‘komplette’ Zeichensatz mit Zeichen in 
allen méglichen Punkte-Kombinationen wiirde also weit mehr als 255 Zeichen 
umfassen. Wenn Sie dann noch bedenken, daB sich mehrere Zeichen zu grofen 
Zeichenblécken zusammenfiigen lassen, erkennen Sie, daS Sie nahezu 
unbegrenzte Méglichkeiten haben, eigene Zeichen zu erfinden. 


Logik 


Ein grundlegender Unterschied zwischen einer Rechenmaschine und einem 
Computer ist die Fahigkeit des Computers, logische Operationen, wie sie in der 
IF THEN -Anweisung gefordert werden, durchfiihren zu kénnen. Die logischen 
Operatoren zerlegen die Werte, die ihnen angegeben werden, in Bit-Muster, und 
vergleichen sie Bit fiir Bit. Das ist alles ganz logisch - es ist nur furchtbar 
schwierig, Logik in einfachen Worten ohne prazise Definitionen zu beschreiben. 


Die beiden Halften eines logischen Ausdrucks werden Argumente genannt. Hin 
logischer Ausdruck ist so aufgebaut: 


-Argument>|:Vergleichsoperator>:Argument> | 


-Argument, kann dabei folgendes sein: - Nicht :Argument> 
- mumerischer Ausdruck> 
- ‘Vergleichsausdruck> 
- logischer Ausdruck> 
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Beide Argumente fiir eine logische Operation miissen ganze Zahlen sein, sonst 
erscheint Fehlermeldung 6. 


Die Vergleichsoperatoren in der Reihenfolge ihrer Prioritat mit dem Ergebnis fiir 
jeden Bit-Vergleich sind: 


AND Ergebnis ist 0, es sei denn, beide Argument-Bits sind 1. 

OR Ergebnis ist 1, es sei denn, beide Argument-Bits sind 0. 

XOR Ergebnis ist 1, es sei denn, beide Argument-Bits sind gleich. 

AND ist der meistbenutzte Operator und bedeutet NICHT dasselbe wie ‘addieren’! 
PRINT 1@ AND 10 

..fthrt zum Ergebnis 10. 
PRINT 1@ AND 12 

..filhrt zum Ergebnis 8. 
PRINT 18 AND 1086 


.. fihrt auch zum Ergebnis 8. 


Das gleiche Ergebnis kommt zustande, weil die Zahlen 10 und 1000 in 
Binardarstellung umgewandelt wurden: 


1010 
1111101000 


Bei der Operation mit AND wird Bit fir Bit verglichen. Wenn das Bit in der 
oberen UND in der unteren Zeile 1 ist, lautet das Ergebnis 1: 


0000001000 


Dies ist die binére Darstellung der Dezimalzahl 8. Der Vergleichsoperator AND 
prift also, wo zwei Bedingungen gleichzeitig erfillt sind. Das folgende Beispiel 
soll dies verdeutlichen: 


18 INPUT "Der wievielte Tag des Monats ist heute";datum 
20 INPUT "Welchen Monat haben wir'";monat 

30 IF datum=24 AND monat=12 GOTO 58 

40 CLS:GOTO 18 

5@ PRINT "Frohe Weihnachten!" 
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OR vergleicht ebenfalls Bits. Das Ergebnis ist immer 1, auSer wenn beide Bits 0 
sind. Dann lautet das Ergebnis 0. Nehmen wir dieselben Zahlen wie im 
AND-Beispiel: 


PRINT 1008 OR 19 
1082 


Bitmuster: 


1010 
1111101000 


Das Ergebnis ist: 
1111101010 
Anwendung von OR im Programmbeispiel: 


18 CLS 

28 INPUT "Welchen Monat haben wir";monat 

3@ IF monat=12 OR monat=1 OR monat=2 THEN 5@ 
46 GOTO 18 

58 PRINT "Jetzt ist Winter" 


Der NOT-Operator kehrt das Bitmuster des Arguments um, d.h. aus 0 wird 1 und 
aus 1 wird 0: 


108 CLS 

26 INPUT "Welchen Monat haben wir";monat 

30 IF NOT (monat=6 OR monat=7 OR monat=8) THEN 5@ 
46 GOTO 16 

58 PRINT “Jetzt ist nicht Sommer!" 


Bedenken Sie, dafs Sie mehrere logische Bedingungen (bis zur maximalen 
Zeilenlange) miteinander verkniipfen kénnen, um _ einen Zustand 
herauszukristallisieren: 


18 INPUT "Der wievielte Tag des Monats ist heute";datum 
28 INPUT "Welchen Monat haben wir";monat 

30 IF NOT (monat=12 OR monat=1) AND datum=29 THEN 5 

4@ CLS:GOTO 18 

58 PRINT "Wir haben weder Dezember noch Januar, aber 
dieses Jahr koennte ein Schaltjahr sein" 
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Das Ergebnis eines Vergleichsausdrucks ist entweder -1 oder 0. Beim Bitmuster 
fiir -1 sind alle Bits der ganzen Zahl 1; beim Bitmuster fiir @ sind alle Bits der 
ganzen Zahl 0. Das Ergebnis einer Vergleichsoperation mit zwei solchen 
Argumenten lautet entweder -1 fiir ‘wahr’ (True) oder @ fur ‘falsch’ (False). 


Prtifen Sie dies, indem Sie dem Programm zwei Zeilen hinzufiigen: 


68 PRINT NOT (monat=12 OR monat=1) 
7@ PRINT (monat=12 OR monat=1) 


Wenn Sie das Programm laufen lassen, und fiir den Tag 29 und den Monat 2 
angeben, erscheint auf dem Bildschirm die Aussage aus Zeile 5@, gefolgt von den 
Werten, die sich aus den logischen Ausdriicken in Zeile 68 und 7@ ergeben. 


Bei einer Operation mit XOR (ausschlieBendes oder eXklusives OdeR) schlieSlich 
wird ‘wahr’ ausgegeben, wenn beide Argumente unterschiedlich sind. 


Die folgende Tabelle, eine sogenannte ‘Wahrheitstafel’ zeigt alle Moéglichkeiten, 
die es bei logischen Vergleichsoperationen gibt. Sie kénnen daran bequem 
ablesen, was bei Bit-weisen Vergleichsoperationen passiert. 


Argument A 1010 
Argument B 0110 


AND Ergebnis 0010 
OR Ergebnis 1110 
XOR Ergebnis 1100 


Benutzer-definierte Zeichen 


Das erste Mal werden Sie vielleicht mit Binarzahlen zu tun haben, wenn Sie mit 
dem SYMBOL-Befehl eigene Zeichen entwerfen wollen. Wird das Zeichen auf 
einer 8x8 Matrix vorbereitet, dann kann jede der 8 Reihen in einen Bindrwert 
umgesetzt werden, indem man 1 fiir jedes Pixel einsetzt, das sichtbar sein soll, 
und 0 fiir die Pixel, die unsichtbar, d.h. in der Grundfarbe des Bildschirms 
dargestellt werden sollen. Diese 8 Ziffern werden im SYMBOL-Kommando 
eingesetzt. Méchten Sie z.B. ein Zeichen mit einem Haus definieren: 


* = 00001000 = &@8 = 8 = 8 
KKK = $668111100 = &3C = 32+16+8+4 = 60 

* * = $@1000018 = &42 = 64 +2 = 66 
* ke *&* * = 19190101 = &A5 = 128 +32 +4 +4 = 165 
* * = 10000001 = &81 = 128 +1 = 129 
eke &e * = 191181801 = &B5 = 128 +32+16 +4 +1 = 181 
kkk * = 180118001 = &B1 = 128 +32+16 +1 = 177 
Ke KKK KR = 11111111 = BFF = 1284+644324+164+8+44+24+1 = 255 
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..lautet der Befehl: 

SYMBOL 240,8,60,66,165,129,181,177,255 
oder: 

SYMBOL 240,808,8&3C,&42,8A5,&81,8B5,&B1,&FF 
oder: 


SYMBOL 248, &X06001000, &X00111100, &X01000010, &X18100101, 
&X18080801, &X18118181, &X18110081, &X11111111 


Um dieses Zeichen mit dem Haus abzubilden, miiBten Sie eingeben: 
PRINT CHRS(248) 


Um schlieBlich mehrere Zeichen zu einem Block zusammenzuschliefBen, schreiben 
Sie: 


doppel$=CHR$(248)+CHRS$( 248) 
PRINT doppel$ 


...oder: 


reihen$S=STRING$(15,248) 
PRINT reihen$ 


Druck-Formatierung 


PRINT ist einer der Befehle, die Sie bei Ihren allerersten Programmierversuchen 
kennenlernen. Sie kénnen mit ihm aber nicht nur angeben, was auf den 
Bildschirm gedruckt wird, sondern auch wo und wie. 


In der einfachsten Form des PRINT-Befehls wird hinter PRINT angegeben, was 


gedruckt werden soll. Dies kann eine Zahl, eine Zeichenfolge (String) oder der 
Name einer Variablen sein: 
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PRINT 3 
3 


PRINT "hallo" 
hallo 


a=5 
PRINT a 
5 


a$="test" 
PRINT aS 
test 


In einer PRINT-Anweisung kénnen mehrere Elemente aufgezahlt werden, die 
jeweils durch ein Trennzeichen, durch TAB oder durch SPC gegeneinander 
abgegrenzt werden kénnen. Trennzeichen sind Semikolon und Komma. Wird ein 
Semikolon verwendet, so werden die Elemente direkt hintereinander aufgereiht, 
bei einem Komma wird das folgende Element in die nachste Druckzone gesetzt. 
Die Breite einer Zone betragt normalerweise 13 Spalten, doch kann die Breite mit 
dem Befeh] ZONE veradndert werden. 


PRINT 3;-4;5 
3-4 5 


PRINT "halli ";"hallo” 
halli hallo 


PRINT "halli","hallo" 


halli hallo 

PRINT 3,-4,5 

3 -4 5 
ZONE 4 

PRINT 3,-4,5 

3 4 5 


Anmerkung: Positiven Zahlen geht eine Leerstelle voraus, wahrend negative 
Zahlen mit einem vorangestellten Minus-Zeichen gekennzeichnet werden. 
AuBerdem folgt allen Zahlen eine Leerstelle. Zeichenfolgen werden genauso 
wiedergegeben, wie sie zwischen den Anfiihrungszeichen dargestellt sind. 
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In der Funktion SPC wird ein numerischer Ausdruck als Parameter angegeben, 
der die Anzahl der auszudruckenden Leerstellen angibt. Ist dieser Wert negativ, 
wird Null angenommen, ist er gréBer als der gegenwartige Bildschirmbereich 
(Window), wird die Breite des Windows angenommen. 


PRINT SPC(5)"hi" 
hi 
x=3 
PRINT SPCCx*3)"hi" 
hi 


Die Funktion TAB ist ahnlich, mit dem Unterschied, da8 so viele Leerstellen 
gedruckt werden, wie nétig sind, um den Ausdruck in die gewiinschte Spalte zu 
setzen. 


Der Ausgabebereich (Stream) ist normalerweise 0 (der volle Bildschirm), wenn 
nicht vor der Liste der auszudruckenden Elemente eine Stream-Nummer (4) 
angegeben wird. Andere Stream-Nummern bezeichnen Teilbereiche des 
Bildschirms. Stream 8 und 9 sind Sonderfalle: Alles, was tiber Stream 8 geschickt 
wird, gibt der Drucker aus (sofern einer angeschlossen ist). Wird Stream 9 
angegeben, so werden die auszudruckenden Elemente in eine Disketten- (oder 
Kassetten-) Datei geschrieben. Fiir diesen Zweck sollte jedoch anstelle von 
PRINT lieber der Befehl WRITE benutzt werden. 


PRINT “hallo” -Fenster 0 

hallo 

PRINT #@,"hallo" -ebenfalls Fenster 0 

hallo 

PRINT #4,"hallo" -Fenster 4 

hallo (Im oberen Teil des Bildschirms) 
PRINT #8,"hallo" -auf dem Drucker (falls angeschlossen) 
hallo 


TAB und SPC eignen sich fiir einfache Druckformate; um jedoch detailliertere 
Angaben zum Format zu machen, verwendet man den Befehl PRINT USING 
und eine passende Formatschablone. Eine Formatschablone ist ein aus 
Sonderzeichen bestehender Textausdruck. Jedes Sonderzeichen definiert einen 
Teil des Formats. Diese ‘Formatzeichen’ werden unter dem Schliisselwort 
PRINT USING im 3. Kapitel genau beschrieben. Vielleicht la%t sich ihre 
Verwendung jedoch durch die folgenden Beispiele noch weiter verdeutlichen. 


PRINT USING "\ \";"Test String” 
Test § 
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"1" kann benutzt werden, um das erste Zeichen eines Strings zu drucken. 


PRINT USING "!";"Test String” 
T 


Das gebraduchlichste String-Formatzeichen ist ‘&’. Normalerweise setzt BASIC 
einen String in eine neue Zeile, wenn er nicht mehr in die alte paft. Mit 
PRINT USING "&" wird dieser Automatismus unterbunden. 


(Wahlen Sie BORDER @, damit Sie den Rand der Schreibflache erkennen 
kénnen.) 


MODE 1:LOCATE 37,1:PRINT "zu lang" 


-Zeile 1 
zu lang -Zeile 2 


MODE 1:LOCATE 37,1:PRINT USING "&";"zu Lang" 


zu ( -Zeile 1 
ang -Zeile 2 


Zur Darstellung von Zahlen lassen sich viele verschiedene Schablonen erstellen. 
Die einfachste ist wahrscheinlich PRINT USING "#####", wobei jedes # fur 
eine Ziffer innerhalb der Zahl steht. 


PRINT USING "######"; 123 
123 


Durch ‘.’ wird die Stelle des Dezimalpunkts festgelegt: 


PRINT USING "####.##4##"712.45 
12.45088 


Wird ‘,’ vor dem Dezimalpunkt in die Schablone eingesetzt, so werden die Ziffern 
vor dem Komma zu Dreiergruppen zusammengefaft und durch Komma 
voneinander abgegrenzt: 


PRINT USING "#H#HHHHH, HHH"; 123456.78 
123,456. 7886 


Dariiberhinaus kann das Format die Wahrungszeichen fir Dollar und Pfund 
enthalten, die dann direkt vor die jeweilige Zahl gesetzt werden, auch wenn diese 
Zahl das Format nicht ausfillt. Die Wahrungszeichen werden als ‘$$’ und ‘f £’ in 
die Formatschablone eingefiigt: _ 
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PRINT USING "SS##";7 
$7 


PRINT USING "S$$##";351 
$351 


PRINT USING "££L####,.##";71234.567 
£1,234.57 


Wie Sie sehen, wird in diesem Fall der Teil hinter dem Dezimalpunkt gerundet. 


Die freien Stellen vor einer Zahl kénnen mit Sternchen gekennzeichnet werden, 
indem in der Formatschablone '"**" angegeben wird: 


PRINT USING "**####.#"712.22 
KeKKT2.2 


Die Sternchen kénnen mit den Wahrungszeichen kombiniert werden, wobei 
letztere in der Formatschablone nur einfach angegeben werden: "**$..." oder 
ae ae 


Ein "+" am Beginn der Formatschablone bedeutet, da8 das Vorzeichen (+ oder 
-) immer vor die Zahl gesetzt wird. Steht ein "+" am Ende der Schablone, so 
wird das Vorzeichen nachgestellt. 


Ein "-" kann nur am Ende der Schablone erscheinen. Es bedeutet, da8 ein 
Minus-Zeichen nachgestellt wird, falls der Zahlenwert negativ ist. 


PRINT USING "+##";12 
+12 


PRINT USING "+##";-12 
-12 


PRINT USING "“##+";12 
12+ 


PRINT USING “##-"7-12 
j2- 


PRINT USING "##-";72 
12 
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Durch Einbeziehung von " ¢ } f { " kann eine Zahl in Exponential-Schreibweise 
wiedergegeben werden: 


PRINT USING "H#H#.#47 771% 123.45 
12.35E+01 


Wenn eine Zahl zu lang fir eine definierte Formatschablone ist, erscheint vor 
dem Ergebnis ein %, um diesen Fall anzuzeigen. Die Zahl wird NICHT gekirzt, 
um in die Schablone zu passen. 


PRINT USING "“####"; 123456 
2123456 


Hatten sie gerne Fenster? 


Das BASIC des CPC6128 bietet die Méglichkeit, den Bildschirm in bis zu acht 
Bereiche, sogenannte Textfenster oder ‘Windows’, einzuteilen. Jeder Befehl fir 
den Text-Bildschirm kann dann an ein beliebiges Fenster gerichtet werden. 


Der Befehl zur Einrichtung eines Fensters heift WINDOW (engl. fur Fenster). 
Dazu werden fiinf Werte angegeben. Der erste gibt dem Fenster eine Nummer. 
Wird der Wert ausgelassen, erhalt das Fenster automatisch die Nummer 0. Alle 
BASIC-Meldungen (z.B. Ready) erscheinen grundsatzlich in Fenster 0. Der 
Fenster-Nummer wird das Kreuz # vorangestellt, um es als Bildschirmbereich 
bzw. Ausgabegerat (Stream) auszuweisen. Die nachsten vier Werte hinter dem 
Befehl WINDOW geben die linke, rechte, obere und untere Begrenzung des 
Fensters an. Diese Werte sind Spalten- und Zeilen-Nummern; sie miissen also fiir 
links/rechts zwischen 1 und 80 und fiir oben/unten zwischen 1 und 25 liegen. 


Das folgende Beispiel definiert ein Fenster mit der Nummer 4, das zwischen der 
7. und 31. Spalte sowie zwischen der 6. und 18. Zeile liegen soll. Setzen Sie den 
Computer zuriick und schreiben Sie: 


WINDOW #4,7,31,6,18 


Es passiert scheinbar nichts nach diesem Befehl, aber schreiben Sie jetzt 
folgendes: 


INK 3,9 
PAPER #4,3 
CLS #4 


Damit erscheint ein groBes griines Rechteck auf dem Bildschirm: das Fenster 
Nummer 4. Aus obigem Programm geht auch hervor, da die Befehle PAPER und 
CLS fur jedes einzelne der acht Fenster verwendet werden kénnen, sofern eine 
Stream-Nummer angegeben wird. Wird keine Stream-Nummer genannt, so wird 
der Befeh] automatisch an Fenster 0 gerichtet. 
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Folgende Befehle kénnen mit einer Stream-Nummer versehen werden, um 
anzuzeigen, fiir welches Fenster der Befehl gelten soll: 


CLS 
COPYCHRS 
INPUT 
LINE INPUT 
LIST 
LOCATE 
PAPER 
PEN 

POS 
PRINT 
TAG 
TAGOFF 
VPOS 
WINDOW 
WRITE 


Das griine Fenster, das Sie auf den Bildschirm gezaubert haben, wird einen Teil 
des Textes verdecken, der vorher in Fenster 0 geschrieben wurde. 


Ein Text kann in ein bestehendes Fenster geschrieben werden, wenn in der 
PRINT-Anweisung die entsprechende Stream-Nummer angegeben wird: 


PRINT #4,"halli hallo” 


Diese Worte erscheinen jetzt oben im griinen Rechteck, und nicht unter der 
Anweisung, wie es im Falle von: 


PRINT "halli hallo" 


..geschehen ware. Bei der ersten Version des Befehls haben Sie gemerkt, da8 ein 
Teil der griinen Flache von der Schrift tiberdeckt wurde. 


Wenn Sie alle BASIC-Meldungen in Fenster 4 erscheinen lassen wollen, konnen 
Sie es mit dem Befehl WINDOW SWAP anstelle von Fenster @ zum 
Standard-Fenster machen: 

WINDOW SWAP @,4 


Das Ready nach diesem Befehl erscheint dann im griinen Fenster, und der 
Cursor direkt darunter. Schreiben Sie jetzt: 


PRINT #4,"halli hallo" 
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..und Sie sehen, da die Worte  halli hallo nun _ unter’ der 
WINDOW SWAP-Anweisung im friiheren Fenster @, das jetzt aber die Nummer 4 
tragt, erscheint. Daran wird tibrigens auch deutlich, da sich der Computer fur 
jedes Fenster die Stelle merkt, wo der Text aufhért, so dai auch nach einem 
Fenster-Tausch der neue Text weiter unten in Fenster 4, und nicht in der ersten 
Zeile erscheint. Schreiben Sie nun: 


LOCATE #4,20,1 
PRINT "Dies ist Fenster 6" 
PRINT #4,"Dies ist Fenster 4" 


Die ‘Fenster Q@’-Meldung steht nun in der Zeile unter PRINT, wahrend die 
‘Fenster 4’-Meldung in der Mitte der ersten Zeile des ganzen Bildschirms 
erscheint. 


Bevor ein WINDOW-Befehl ausgegeben wird, bedecken alle acht Fenster den 
gesamten Bildschirm. Dies gilt auch nach einem MODE-Kommando. Wenn Sie 
also Fenster benutzt haben, und der Cursor in einem sehr kleinen Fenster bleibt, 
tippen Sie einfach MODE 1 ein: 


MODE 14 
WINDOW 20,21,7,18 
MO 
DE 
1 


Es macht nichts, daB MODE tber zwei Zeilen veteilt ist; vergessen Sie aber nicht 
die Leerstelle zwischen MODE und 1. 


Da Sie nun tiber Fenster ein wenig Bescheid wissen, probieren Sie das folgende 
kleine Programm aus: 


18 MODE @ 

20 FOR n=6 TO 7 

30 WINDOW #n,n+1,n+6,n+1,n+6 
46 PAPER #n,n+4 

5@ CLS #n 

68 FOR c=1 TO 206:NEXT c 

770 NEXT n 


Sie erhalten acht sich tiberlappende Fenster in verschiedenen Farben. Wenn die 
Durchfiithrung des Programms beendet ist, und Ready erscheint, dricken Sie 
einige Male auf die [RETURN]-Taste. Sie sehen, wie das Durchrollen von Fenster 
@ die bunten Blécke auf dem Bildschirm beeinfluft. Obwohl diese Blocke sich 
jedoch verschieben, verandert sich die Stellung der anderen Fenster nicht. 
Probieren Sie folgendes: 
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CLS #4 


..und Sie sehen, da} sich das 4. Fenster noch an seiner alten Stelle befindet und 
nun die darunterliegenden Fenster verdeckt. Sehen Sie sich die unterschiedlichen 
Effekte an, wenn Sie folgende Befehle eingeben: 


LIST 
LIST #4 
LIST #3 


Eine weitere Eigenschaft des Befehls WINDOW wird im letzten Beispiel dieses 
Teils demonstriert: Es ist gleichgiiltig, ob Sie erst die linke oder die rechte 
Begrenzung des Fensters angeben, da BASIC automatisch erkennt, dafi es sich 
bei dem gréferen Wert um die rechte Begrenzung handelt. Dasselbe gilt fiir die 
Parameter des oberen und unteren Fenster-Randes. 


18 MODE @ 

20 a=1+RND*19:b=1+RND*19 
38 c=1+RND*24:d=1+RND*24 
46 e=RND*15 

58 WINDOW a,b,c,d 

6@ PAPER e:CLS 

78 GOTO 20 


Darf ich mal unterbrechen? 


Falls Sie es noch nicht bemerkt haben sollten: Eine wichtige Neuheit in der 
Software der Schneider-Computer ist ihre einzigartige Fahigkeit, mit 
Unterbrechungen in BASIC-Programmen zu arbeiten. Dies bedeutet, da das 
Schneider-BASIC in der Lage ist, unterschiedliche Operationen eines Programms 
gleichzeitig durchzufiihren. Diese Fahigkeit wird manchmal als ‘Multitasking’ 
bezeichnet und wird durch die Befehle AFTER und EVERY hervorgerufen. 


Diese Eigenschaft tritt auch bei der Tonerzeugung in Form von Warteschlangen 
und Rendezvous-Vorgangen zutage. 


Alle zeitabhangigen Vorgange werden von einer zentralen Uhr gesteuert, einem 
quarzbetriebenen Zeitgeber-System im Computer, das den zeitlichen Ablauf und 
die Synchronisation der Vorgange im Computer tiberwacht, wie z.B. die 
Abtastfrequenz und die Vorgange im Prozessor. Jede zeitabhangige 
Hardware-Funktion wird von der zentralen Quarzuhr gesteuert. 


Auf der Software-Seite haben wir die Kommandos AFTER und EVERY. Wie beim 
Schneider-BASIC wblich, sind die Kommandos benutzerfreundlich und sagen 
auch, was sie tun. Die AFTER-Anweisung bewirkt, da8 nach der angegebenen 
Zeit in das gewinschte Unterprogramm gesprungen wird, um die darin 
enthaltenen Anweisungen auszufiihren. 
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Der CPC6128 besitzt eine Echtzeituhr. Das AF TER-Kommando erméglicht, daB 
Unterprogramme erst nach einer bestimmten Zeit ausgefiihrt werden. Vier 
unabhangige Zeitgeber stehen zur Verfigung, die je mit einem eigenen 
Unterprogramm verbunden sein kénnen. 


Sobald die vorgegebene Zeit verstrichen ist, wird das Unterprogramm 
automatisch aufgerufen, als hatte an dieser Stelle im Programm ein 
GOSUB-Kommando gestanden. Am Ende des Unterprogramms, das mit einem 
normalen RETURN-Kommando abschlie8t, kehrt das Programm zu der Stelle 
zurtick, wo es vorher unterbrochen worden war. 


Mit dem Befehl EVERY kann innerhalb eines BASIC-Programms in 
regelmafigen Abstanden ein Unterprogramm wiederholt aufgerufen werden. 
Auch hierfir stehen vier Zeitgeber zur Verfiigung, die je mit einem eigenen 
Unterprogramm verbunden sein kénnen. 


Die Zeitgeber haben verschiedene Unterbrechungsprioritaten. Zeitgeber 3 hat die 
héchste, Zeitgeber 0 die niedrigste Prioritat. (Siehe auch Kapitel ‘Ubersicht’) 


18 MODE 1:n=14:x=RND*400 

20 AFTER x,3 GOSUB 8@ 

30 EVERY 25,2 GOSUB 168 

40 EVERY 18,1 GOSUB 178 

5@ PRINT "Reaktionstest" 

6@ PRINT "Druecke die Leertaste."; 

7@ IF Flagge=1 THEN END ELSE 78 

88 z=REMAIN(2) 

98 IF INKEY(47)=-1 THEN 110 

18@ SOUND 1,9@8:PRINT "geschummelt!":GOTO 158 
11@ SOUND 129,2@0:PRINT "JETZT": t=TIME 

120 IF INKEY(47)=-1 THEN 126 

13@ PRINT "Du hast"; 

140 PRINT (TIME-t)/300;"Sekunden gebraucht.” 
15@ CLEAR INPUT: Flagge=1:RETURN 

168 SOUND 1,0,5@:PRINT ".'"::RETURN 

178 n=nt+1:1F n>26 THEN n=14 

188 INK 1,n:RETURN 


AFTER- und EVERY-Befehle sind tberall einsetzbar, wobei fiir den jeweiligen 
Zeitgeber immer andere Unterprogramme und Zeiten angegeben werden kénnen. 
AFTER und EVERY miussen sich die Zeitgeber teilen, so da’ ein 
AFTER-Kommando ein vorheriges EVERY-Kommando fir einen bestimmten 
Zeitgeber tiberschreibt und umgekehrt. 
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Mit den Befehlen DI und EI werden Zeitgeber-Unterbrechungen auBer Kraft 
bzw. wieder in Kraft gesetzt, wahrend die dazwischenliegenden Befehle 
ausgefiihrt werden. Dadurch wird verhindert, da8 ein Unterbrechungsprogramm 
héherer Prioritat einsetzt, wahrend noch eine Unterbrechung niedrigerer 
Prioritat bearbeitet wird. 


Die Funktion REMAIN setzt einen der vier Zeitgeber aufer Kraft und gibt die 
verbleibende Restzeit an. 


READ und DATA 


Fir ein Programm, das in seiner Startphase immer mit demselben Satz an Infor- 
mationen gefiittert werden mu, ware es sinnvoller, wenn man diese Informatio- 
nen eingeben kénnte, ohne den Benutzer jedesmal zu bitten, sie einzutippen. 
Diese Méglichkeit ist mit den Befehlen READ und DATA gegeben. Ahnlich wie 
INPUT dient der Befehl READ dazu, Variablen einen Wert zuzuordnen. Er unt- 
erscheidet sich jedoch dadurch, da8 Werte von DATA-Anweisungen gelesen wer- 
den, und nicht tiber die Tastatur eingegeben werden miissen. Das folgende Bei- 
spiel mag dies verdeutlichen: 


16 INPUT "Gib 3 durch Komma getrennte Zahlen ein'";a,b,c 
20 PRINT "Die Zahlen heissen";a;"und";b;"und";c 

run 

1@ READ a,b,c 

20 PRINT "Die Zahlen heissen";a;"und";b;"und";c 

38 DATA 12,14,21 

run ’ 


Genauso wie beim INPUT-Befehl werden die Angaben in der DATA-Anweisung 
durch Kommata getrennt. 


AuBer numerischen Werten kann eine DATA-Anweisung auch konstante 
Textfolgen (Strings) enthalten: 


18 DIM a$(9) 

20 FOR i=1 TO 9 

30 READ a$(i) 

48 NEXT 

5@ FOR i=8 TO 9 

68 PRINT a$Ci)d;" "; 

76 NEXT : 

80 DATA Der,flinke,rote,Fuchs,springt,ueber,den,faulen 
Hund 
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Wie Sie sehen, sind die Textfolgen in der DATA-Anweisung nicht in 
Anfihrungszeichen " " eingeschlossen. Anfihrungszeichen zur Trennung der 
einzelnen Strings kénnen in DATA-Anweisungen angegeben oder weggelassen 
werden, genauso wie bei Strings, die Sie als Anwort auf eine INPUT-Anweisung 
eintippen. In einem Fall sind Anfithrungszeichen in DATA-Anweisungen jedoch 
hilfreich, namlich dann, wenn der String selbst Kommas enhalt. Ist der String 
unter solchen Umstanden nicht durch Anfiihrungszeichen gekennzeichnet, wird 
READ das Komma in diesem String als Trennungszeichen zwischen 
verschiedenen Strings interpretieren. 


18 READ a$ 

20 WHILE a$<>"x*" 

30 PRINT a$ 

40 READ a$ 

5@ WEND 

68 DATA Das alte,verfallene,verrottete Haus knarrte im 
Wind 

7@ DATA "Der grosse,schlanke,dunkle Mann hustete verne 
hmlich.” 

80 DATA * 


Da der String in Zeile 60 Kommas enthalt, wird jeder Teil einzeln durch den 
Befehl READ gelesen und gedruckt. Der String in Zeile 70 wird, da er in 
Anfihrungszeichen eingeschlossen ist, wie beabsichtigt als Ganzes gedruckt. 

An diesem Beispiel wird klar, da8 DATA-Anweisungen in mehreren Zeilen 
vorkommen kénnen. READ geht die Zeilen der Reihe nach durch (60, 70, 80 usw.). 
Eine weitere, vielleicht nicht so  offensichtliche Tatsache ist, dak 
DATA-Anweisungen an beliebiger Stelle im Programm auftreten kénnen: vor 
oder nach der READ-Anweisung, die die Information aufnimmt. 

Hat ein Programm mehr als eine READ-Anweisung, macht das zweite READ an 
der Stelle weiter, wo das erste aufgehért hat: 


10 DATA 123,456,789,321,654,2343 

20 FOR i=1 TO 5 

38 READ num 

40 total=total+num 

5@ NEXT 

66 READ totale 

76 IF total=total2 THEN PRINT "Die Daten stimmen" ELSE 
PRINT "Die Daten sind fehlerhaft” 


Verdndern Sie Zeile 10, indem Sie eine der ersten 5 Zahlen verfalschen, und 
lassen Sie das Programm erneut laufen. Diese Methode, am Ende der 
DATA-Anweisung einen Wert anzugeben, der die Summe der vorangehenden 
Daten bildet, ist eine wirksame Moglichkeit, Fehler beim Eintippen von Daten 
aufzuspiiren, besonders, wenn es sich um sehr lange DATA-Zeilen handelt. Der 
letzte Wert wird auch ‘Kontrollsumme’ genannt. 
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Wenn ein Programm gemischte Daten enthalten soll, dh. sowohl Strings wie 
Zahlen, ist es zulassig, in READ- und DATA-Anweisungen Elemente beider 
Kategorien anzugeben, solange sie richtig gelesen werden. Wenn z.B. in einer 
DATA-Anweisung jeweils zwei Zahlen, gefolgt von einem String, auftreten, ist 
das Ergebnis nur sinnvoll, wenn die READ-Anweisung zwei Zahlenvariablen und 
eine Stringvariable enthalt: 


18 DIM a(5),b(5),s$(5) 

20 FOR i=1 TO 5 

3@ READ a(i),b(i),s$(i) 

40 NEXT 

5@ DATA 1,7,Fred,3,9,Jim,2,2,Erich,4,6,Peter,9,1,Alfons 
66 FOR i=1 TO 5 

76 PRINT s$C4),":"7ali)*b(i) 

86 NEXT 


Andererseits haben Sie die Méglichkeit, die verschiedenen Datentypen getrennt 
zu behandeln: 


18 DIM a(5),b(5),s$(5) 

2@ FOR i=1 TO 5 

3@ READ a(i),b(i) 

4@ NEXT 

5@ FOR i=1 TO 5 

6@ READ s$(i) 

78 NEXT 

80 DATA 1,7,3,9,2,2,4,6,9,1 
90 DATA Fred,Jim,Erich,Peter,Alfons 
186 FOR i=1 TO 5 

119 PRINT s$Ci),"i";alid*bli) 
120 NEXT 


Wenn Sie die FOR-Schleife in Zeile 20 nun folgendermaBen andern: 

20 FOR i=1 TO 4 
..kommt bei den ersten beiden Leseversuchen ‘9’ und ‘1’ heraus. Dies sind 
natiirlich giltige Strings, aber so war das Ergebnis nicht geplant! Wir haben die 
Moglichkeit, das Programm richtig laufen zu lassen, indem wir zwei Zeilen 


einfiigen: 


15 RESTORE 88 
45 RESTORE 98 
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Der RESTORE-Befehl setzt den DATA-Lese‘zeiger’ in die angegebene Zeile. 
RESTORE ist daher fiir I F...THEN-Anweisungen geeignet, damit ein bestimmter 
Datenblock in Abhangigkeit von einem Kriterium ausgewahlt und gelesen wird. 
Wenn Sie 2z.B. ein  mehrstufiges Programm mit verschiedenen 
Bildschirmdarstellungen haben, kann jeder Bildschirm mit einer bestimmten 
Variablen, z.B. ‘stufe’ ausgewahlt werden. Zur Illustration zeigen wir hier 
einen entsprechenden Abschnitt aus einem Programm: 


1000 REM Teil, der den Bildschirm zeichnet 
1010 IF stufe=1 THEN RESTORE 2016 

1820 IF stufe=2 THEN RESTORE 2518 

1030 IF stufe=3 THEN RESTORE 3019 

1846 FOR y=1 TO 25 

1058 FOR x=1 TO 46 

1868 READ zeichen 

1870 locate x,y: PRINT CHRS$(zeichen); 

1888 NEXT x,y 


2000 REM Daten fuer Bildschirm 1 
2018 DATA 200,198,244,244,2180,...uUSW. 
#: 

250@ REM Daten fuer Bildschirm 2 
2518 DATA 1080,183,245,243,251,...USW. 


3000 REM Daten fuer Bildschirm 3 
3010 DATA 190,191,192,193,194,..-USW. 


Ein weiteres Anwendungsbeispiel fiir DATA, READ und RESTORE ist ein 
Programm fir eine Melodie. Dabei liest READ die Werte der Tonperioden aus der 
DATA-Anweisung, und RESTORE dient dazu, einen Teil der Melodie zu 
wiederholen, indem es den Zeiger immer an den Anfang eines bestimmten 
Datenelementes setzt: 


10 FOR i=1 TO 3 

26 RESTORE 1060 

30 READ note 

4@ WHILE note <>-1 

58 SOUND 1,note,35 

66 READ note 

78 WEND 

88 NEXT 

98 SOUND 1,142,180 

160 DATA 95,95,142,127,119,186 
118 DATA 95,95,119,95,95,119,95 
128 DATA 95,142,119,142,179,119 
130 DATA 142,142,166,119,127,-1 
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Der Ton macht die Musik 


Von allen Méglichkeiten des CPC6128 wirken die SOUND- und 
Hillkurven-Befehle auf den ersten Blick am undurchdringlichsten - aber haben 
Sie keine Befiirchtungen. Mit etwas Ubung sollten Sie bald in der Lage sein, eine 
Vielzahl verschiedener Téne zu erzeugen, oder gar eine ganze Melodie mit 
Harmonien zu spielen. 


Sehen wir uns zu Beginn noch einmal die vier Teile des SOUND-Befehls an. Es 
sind: Kanalnummer, Tonperiode, Dauer der Note und Lautstarke. Sie werden sich 
jetzt fragen, in welcher Form diese Angaben erscheinen. 


Wir lassen den ersten Teil (Kanalnummer) zunachst beiseite, da seine 
Beschreibung ziemlich kompliziert ist. Fiir den zweiten Teil (Tonperiode) kann im 
Prinzip jede ganze Zahl zwischen 0 und 4095 angegeben werden, aber nur wenige 
davon erzeugen tatsachlich Tone, die als Noten erkennbar sind. Diese 
Tonperioden sind im 5. Teil des Kapitels ‘Ubersicht’ aufgefihrt. Nummer 239 z.B. 
erzeugt das eingestrichene C, und 253 die Note H, eine halbe Stufe unter dem C. 
Die Werte 240 bis 252 erzeugen zwar ebenfalls Tone, doch sind diese nicht im 
Tonumfang eines Klaviers enthalten. Tonperiode 0 ergibt titberhaupt keinen Ton 
- dies erweist sich fir den Einsatz von Gerduschen als vorteilhaft, wie wir spater 
noch sehen werden‘ 


Fir den dritten Teil des SOUND-Befehls wird ein Wert angegeben, der die Lange 
des Tones in Hundertstelsekunden mift. Der Wert liegt im allgemeinen zwischen 
1 und 32767. Ist der Wert jedoch 0, wird die Lange des Tones durch die Hullkurve 
bestimmt. (Dazu spater mehr.) Ein negativer Wert gibt an, wie oft die Hillkurve 
wiederholt werden soll. -3 bedeutet also eine dreimalige Wiederholung der 
Hillkurve. 


Die Werte fir den vierten Teil, der die Lautstarke bestimmt, kénnen zwischen 0 
und 15 liegen. Werden keine Lautstarke-Werte angegeben, nimmt der Computer 
automatisch 12 an. Bei den einfachen Toénen, die bisher erzeugt wurden, blieb die 
Lautstarke wadhrend ihrer ganzen Lange konstant. Wenn sie mit einer 
‘Lautstarken-Hillkurve’ variiert werden, so bildet der Wert fir ‘Lautstarke’ im 
SOUND-Befeh] die Ausgangslautstarke. 


Kommen wir nun zum ersten Teil des Befehls: Kanalnummer. Der hierfir 
angegebene Wert ist Bit-signifikant; um das zu verstehen, miften Sie sich in den 
ersten Teil dieses Kapitels iber das Binarsystem vertiefen, sofern Sie es noch 
nicht getan haben. 


Ein Ton kann iiber einen der drei méglichen Kanale ausgegeben werden. Ist der 
Computer an einen Stereo-Verstarker angeschlossen, lauft ein Kanal tiber den 
linken, der andere tiber den rechten Lautsprecher, und der dritte iber beide (der 
Ton scheint dann aus der Mitte zu kommen). Um zu bestimmen, tiber welchen 
Kanal der Ton bzw. die Téne kommen soll(en), werden folgende Nummern 
eingesetzt: 


Kapitel 9 Seite 36 Wenn Sie mal Zeit haben 


1 fir Kanal A 
2 far Kanal B 
4 fir Kanal C 


Um mehr als einen Kanal zu benutzen, kénnen die Nummern fir die 
gewtnschten Kandle addiert werden. Um einen Ton tiber A und C zu erzeugen, 
wird also 1+4=5 eingesetzt: 


SOUND 5,284 


Sie werden sich wundern, daB Kanal C die Nummer 4 und nicht 3 hat. Das liegt 
daran, da} alle Nummern fir die Kanale Potenzen von 2 sind (1=2 10, 2=2 f 1, 
4=2 | 2), so da in der Kombination eine Binarzahl entsteht. Wenn Sie sich eine 
dreistellige Binarzah] denken, ist jede Ziffer entweder 0 oder 1, und dieses 
Schema wird bei der Kanalnummer benutzt, um anzuzeigen, ob der zugehdrige 
Kanal an- oder abgeschaltet sein soll. 


Dezimal 5 entspricht 1*4+@*2+1%*1 = 101 in der Binarschreibweise. Durch 
die Benennung jeder Spalte mit C, B und A ergibt sich folgendes Bild: 

C BA 

1 0 1 


Das heift, Kanal C ist angeschaltet, B ist aus- und A ist angeschaltet. Sollte der 
Ton Uber die Kandle A und B ausgegeben werden miifite es so aussehen: 


C BA 
0 i il 


Die Binarzahl 011 entspricht aber @*4+1%2+1%1 = 3, so daf®¥ der 
SOUND-Befehl lauten miBte: 


SOUND 3,142 


Dies ist natirlich derselbe Wert, der sich ergibt, wenn die Nummern der Kanale, 
die benutzt werden sollen, addiert werden (A=1, B=2, C=4). Um einen Ton tiber 
A und B zu schicken, mu8 als Kanalnummer 1+2=3 angegeben werden. 


Falls Sie nicht ganz mitkommen, seien Sie unbesorgt. Eigentlich genigt es, zu 
wissen, daB sich eine Kombination von Kanalen durch die Addition der 
betreffenden Kanalnummern erreichen 1a8t. 


Leider gibt es jedoch noch andere Werte, die fiir ‘Kanalnummer’ eingesetzt 
werden kénnen. Die Werte 8, 16 und 32 werden benutzt, um anzugeben, da8 ein 
Ton sich mit einem anderen Kanal zum ‘Rendezvous’ treffen soll. Wahrscheinlich 
wundern Sie sich tber den Begriff ‘Rendezvous’. Bis jetzt haben wir die erzeugten 
Tone direkt zu den gewiinschten Kandlen geschickt. Probieren Sie folgendes aus: 


SOUND 1,142,28086 
SOUND 1,908,208 
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Sofern Sie nicht sehr langsam getippt haben, werden Sie bemerkt haben, da Sie 
den zweiten Befehl eingeben konnten, bevor der erste fertig ausgefiihrt war. Dies 
war moglich, weil das System in der Lage ist, fiir jeden Kanal bis zu finf 
SOUND-Befehle in einer sogenannten ‘Warteschlange’ zu speichern. Wenn wir 
einen Ton auf Kanal A und danach einen Ton gleichzeitig auf A und B spielen 
wollten, miiBten wir den Computer irgendwie wissen lassen, da8 der Ton auf B 
nicht beginnen soll, bevor der erste Ton auf A fertig ist, d.h. die Kanale miissen 
aufeinander warten. Dies wird ‘Rendezvous’ genannt, und kann auf zweierlei 
Weise hervorgerufen werden: 


SOUND 1,2080,1000 
SOUND 3,908,208 


Der zweite Ton wird hierbei nach A und B geschickt; er kann also nicht beginnen, 
bevor der Ton auf A geendet hat. Die Grenze dieses Verfahrens, bei dem ein Ton 
in den Wartezustand gesetzt wird, bis alle erforderlichen Kandle fir ihn frei sind, 
besteht darin, da8 zu jedem dieser Kandle derselbe Ton geschickt wird. In 
unserem Beispiel ging ,9@,2@@ sowohl zu A als auch zu B. Die zweite Methode 
sieht folgendermafen aus: 


SOUND 1,200,2008 
SOUND 1+16,98,200 
SOUND 2+8,148,408 


Hier trifft sich die zweite Note auf A mit dem Ton auf B (und der Ton auf B trifft 
sich mit der Note von A). Der Vorteil bei diesem Verfahren liegt auf der Hand: 
Obwohl sich die zweite Note auf A von der Note auf B unterscheidet, sind die 
beiden miteinander verbunden, so da keiner von beiden beginnen kann, bevor 
beide Kandle frei sind. Dies nennt man Rendezvous. Die hierfir erforderlichen 
Werte sind ebenfalls Bit-signifikant: 


8=2 13, 16=2 14, 32=275 


Die Kanalnummer ist also eine Binarzahl mit jeweils folgenden 
Kanalbezeichnungen: 


Rendez-vous Rendez-vous Rendez-vous Ausgabe tiber Ausgabe tiber Ausgabe tiber 
A C B A 
plus 32 plus 16 plus 8 plus 4 plus 2 plus 1 


Soll z.B. eine Note auf Kanal C gespielt werden und sich mit A treffen, mu8 
folgendes angegeben werden: 


0 0 1 1 0 0 


Dies ist die Bindarzahl! 1100, die in dezimaler Form 8+4=12 lautet. 
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Wird also fir ‘Kanalnummer’ der Wert 12 eingesetzt, wei der Computer, daf er 
eine Note auf Kanal C spielen und auf eine Note warten soll, die zum Rendezvous 
mit ihr auf Kanal A vorgesehen ist. 


Wenn zur Kanalnummer 64 (216) hinzuaddiert wird, wird die Note gehalten. 
Das heiBt im wesentlichen, da8 der Ton erst nach dem Befehl RELEASE gespielt 
wird, 


Und wird 128 (2 f 7) zur Kanalnummer hinzuaddiert, so wird die Warteschlange 
des betreffenden Kanals geléscht. Falls Sie einen Ton starten, der zu lang fir 
einen bestimmten Kanal ist, kénnen Sie ihn schnell stoppen, indem Sie den 
Kanal loschen: 


SOUND 1,248,3800008 (Der Ton wirde 5 Minuten laufen) 
SOUND 1+128,0 (Dadurch wird der Ton gestoppt.) 


Im direkten Befehlsmodus haben Sie eine schnellere Méglichkeit, lange Tone zu 
stoppen, indem Sie die [DEL]-Taste driicken. Nach einem kurzen Warn-Piepston 
werden alle Tonkandle geléscht. 


Da wir nun hoffentlich in der Lage sind, einen Ton nach Belieben zu einem der 
drei Kanale zu schicken (wenn nétig, mit Rendezvous), ware es doch schén, wenn 
wir etwas mehr produzieren kénnten als ein ziemlich langweiliges ‘Pieps’, das der 
einfache SOUND-Befehl hervorruft. Diese Méglichkeit haben wir, wenn wir den 
Ton mit Hilfe einer Hiillkurve wahrend seiner Dauer lauter oder leiser werden 
lassen. Ein auf einem Musikinstrument erzeugter Ton schwillt zunachst stark 
und plotzlich an, bleibt dann eine gewisse Zeit auf einem etwas niedrigeren 
Niveau und klingt dann bis auf 0 ab. Auch die durch SOUND erzeugten Tone 
kénnen mit einer derartigen Lautstarke-Kurve versehen werden. Dazu benutzt 
man den Befehi ENV. Sehen wir uns dazu erst ein einfaches Beispiel an: 


ENV 1,5,3,4,5,-3,8 
SOUND 1,142,0,08,1 


Der Befehl ENV wird im SOUND-Befeh] verwendet, und mu daher vor ihm 
stehen. Die Nummer der in ENV definierten Hiillkurve wird dann an finfter 
Stelle im SOUND-Befehl eingesetzt. In unserem Beispiel tragt die Hillkurve die 
Nummer 1. Im ENV-Befehl erscheint die Nummer der Hiillkurve an erster 
Stelle. Weiterhin enthalt er Informationen tiber die Dauer des Tones und seinen 
Lautstarkeverlauf, so da im zugehérigen SOUND-Befehl fiir ‘Dauer’ und 
‘Lautstarke’ einfach 0 eingesetzt werden kann. Die im obigen Beispiel definierte 
Hillkurve hat einen fiinfstufigen Lautstarke-Anstieg, wobei jede Stufe um den 
Lautstarkewert 3 zunimmt und vier Hundertstelsekunden dauert. Danach fallt 
die Lautstarke in fiinf Stufen um jeweils -3 ab, wobei jede Stufe eine Dauer von 
acht Hundertstelsekunden hat. Beim ENV-Befehl steht mit anderen Worten an 
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erster Stelle die Nummer der Hiillkurve, die darin definiert wird. Es folgen zwei 
Gruppen zu jeweils drei Zahlenangaben, sogenannte Hiillkurven-Abschnitte. Die 
erste Zahl in jedem Abschnitt gibt an, in wieviel Stufen der Ton an- bzw. 
abschwellen soll, die zweite Zahl bestimmt, um wieviel Lautstarkegrade jede 
Stufe ansteigen bzw. abfallen soll, und die dritte Zahl zeigt an, wie lange der Ton 
auf jeder Lautstarkestufe verharren soll. 


Die Gesamtdauer jedes Hillkurvenabschnitts ergibt sich also aus der 
Multiplikation des ersten Wertes (Anzahl der Stufen) mit dem dritten Wert 
(Dauer pro Stufe). Die gesamte Lautstarke-Differenz innerhalb eines 
Hiullkurvenabschnitts errechnet sich aus der Anzahl der Stufen, multipliziert mit 
dem Anstieg bzw. Abfall der einzelnen Stufen. Die Gesamtlange einer Hiillkurve 
mit mehr als einem Abschnitt ist die Summe der Lange der einzelnen Abschnitte. 


Natiirlich braucht die Ausgangslautstarke nicht unbedingt @ (im S$ OUND-Befehl) 
zu sein. Im obigen Beispiel schwoll der Ton erst an und dann ab. Im nachsten 
Beispiel verhalt es sich umgekehrt: 


ENV 2,5,-2,1,20,0,1,10,1,1 
SOUND 1,248,0,15,2 


Diese Hillkurve tragt die Nummer 2 und besteht aus drei Abschnitten. Im ersten 
wird die Lautstarke in 5 Stufen um jeweils ~2 reduziert, d.h. der Abschnitt hat 
finf Lautstarkestufen, und mit jeder Stufe nimmt der Ton um zwei 
Lautstarkegrade ab. Jede einzelne Stufe hat eine Lange von 1 
Hunderstelsekunde. Der nachste Abschnitt der Hillkurve hat 2@ Stufen, und auf 
jeder Stufe betragt der Lautstarkeanstieg bzw. -abfall @, dh. die Lautstarke 
bleibt konstant. Auch hier dauert jede Stufe 1 Hundertstelsekunde. Der dritte 
Abschnitt schlieBlich besteht aus 18 Stufen, die um 1 Lautstarkegrad zunehmen 
und 1 Hunderstelsekunde lang sind. 


Im SOUND-Befehl ist eine Anfangslautstarke von 15 angegeben, d.h. nach dem 
ersten Hillkurvenabschnitt liegt die Lautstarke bei 5. Auf diesem Niveau bleibt 
er fir 20 Hundertstelsekunden, um im letzten Abschnitt wieder auf 15 
anzusteigen. 


Ks ist vielleicht etwas schwierig, sich die Form solcher Hillkurven vorzustellen. 
Es hat sich als hilfreich erwiesen, sie auf Millimeterpapier darzustellen, und 
daraus die Werte fiir den ENV-Befehl abzuleiten. Die folgenden beiden Skizzen 
stellen die eben beschriebenen Hiillkurven bildlich dar. 
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Relative Lautstarkeveranderung 


a 2 32 * 40 a4 48 52 6 oo en 
Anzahl der Stufen 5 

StufengréBe -3 

Dauer pro Stufe 8 


Relative Lautstarkeveranderung 


1203.4 5 6 7 8 9 10 1112 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 2930 31 32 33.3435 


1/100 Sekunden 


1 
Anzahl der Stufen 5 i Anzahl der Stufen 20 ! 
StufengréBe -2 | StufengréBe 0 
Dauer pro Stufe 1 | Dauer pro Stufe 1 t 

I 


Eine Huillkurve kann hoéchstens fiinf Abschnitte mit je drei Werten umfassen, d.h. 
der ENV-Befehl kann aus maximal 16 Teilen bestehen. (Darin ist der erste Wert 
eingeschlossen, der angibt, um welche der 15 Hillkurven (1 bis 15) es sich 
handelt.) Geht die Lautstarke beim Anstieg tber 15 hinaus oder beim Abfall 
unter 0, so springt sie zum entgegengesetzten Lautstarke-Extrem, d.h. der Wert 
nach 15 ist 0, und der Wert nach 0 ist 15: 


ENV 3,9,5,20 
SOUND 1,142,0,8,3 


Diese einfache Hullkurve erzeugt 9 Stufen mit einem Lautstarkeanstieg von je 5; 
jede Stufe hat eine Dauer von 2@ Hundertstelsekunden. Nach den ersten drei 
Stufen ist die maximale Lautstarke von 15 erreicht. In der nachsten Stufe liegt 
sie deshalb auf 4, dann auf 9 usw. Die nachste Skizze verdeutlicht diesen 
Vorgang: 
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Relative Lautstarkeveranderung 


80 90 


Anzah! der Stufen 9 
Stufengr6Be 5 
Dauer pro Stufe 20 


Der Wertebereich fiir ‘Anzahl der Stufen’ liegt zwischen 0 und 127; die 
‘Stufengr6éRe’ kann zwischen -128 und +127 variieren, wobei negative Werte 
einen Lautstarkeabfall bewirken; fiir ‘Dauer pro Stufe’ kann ein Wert zwischen 0 
und 255 angegeben werden. 


Nachdem Sie nun wissen, wie man die Lautstarke eines Tones variiert, méchten 
wir Ihnen erlautern, wie man den Ton in Schwingungen versetzt, um einen 
Vibrato-ahnlichen Effekt zu erzielen. 


Dazu geht man 4hnlich vor wie bei der Definition der Lautstarken-Hiillkurven: 
Man definiert eine Ton-Hiillkurve mit dem Befeh] ENT. 


Beispiel: 


ENT 1,5,1, 
1 


1g5¢-1,.4 
SOUND 1,142,18,15,,1 
An sechster Stelle im SOUND-Befehl steht die Nummer der Ton-Hiillkurve, die 
zur Erzeugung dieses Tones verwendet werden soll. Daher mu auch die 


ENT-Anweisung vor dem SOUND-Befehl erscheinen. 
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Dieses erste Beispiel fiir ENT definiert die Ton-Hiillkurve Nr.1. Ihr erster 
Abschnitt besteht aus 5 Stufen, in denen die Tonperiode um jeweils 1 erhdoht 
wird; jede Stufe dauert 1 Hundertstelsekunde. Fir den nachsten Abschnitt sind 5 
Stufen angegeben, in denen die Tonperiode um jeweils - 1 abnimmt; wieder hat 
jede Stufe eine Dauer von 1 Hundertstelsekunde. Das ergibt eine Gesamtlange 
von 5+5=10. Beachten Sie, daB dieser Wert im SOUND-Befehl angegeben wird, 
da die Ton-Hiillkurve NICHT die Lange eines Tones bestimmt, in der Weise, wie 
es die Lautstarken-Hullkurve tut. Ist die im SOUND-Befehl angegebene Dauer 
kurzer als die Lange der Ton-Hiillkurve, geht der letzte Teil der Ton-Hillkurve 
verloren. Ist die Dauer im SOUND-Befehl umgekehrt langer als die Dauer der 
Ton-Hillkurve, so bleibt der Ton fiir den Rest seiner Dauer auf dem zuletzt 
erreichten Niveau. Dasselbe trifft zu, wenn eine Lautstarken-Hillkurve benutzt 
wird, um die Lange einer Note zu bestimmen. 


(Beachten Sie, dai fir ‘Lautstarken-Hillkurve’ im SOUND-Befehl nichts 
angegeben wurde, weil wir fiir diesen Ton keine Lautstarken-Hillkurve definiert 
haben.) 


In den meisten Fallen wird die Ton-Hillkurve wahrscheinlich viel kirzer sein als 
die Lange des Tones. Deshalb kann man veranlassen, da8 sich eine 
Ton-Hillkurve wahrend der gesamten Dauer eines Tones standig wiederholt, 
indem man der Ton-Hillkurve eine negative Nummer gibt. Im SOUND-Befehl 
mu diese Nummer aber als positive Zahl angegeben werden: 


ENT -5,4,1,1,4,-1,1 
SOUND 1,142,180,12,,5 


Dies erzeugt einen schwingenden Ton. Bei der Definition einer Ton-Hillkurve 
sollte man im allgemeinen darauf achten, da8 der Ton symmetrisch um die 
anfangliche Tonperiode schwingt, so da sich durch die Wiederholung der 
Ton-Hillkurve die Tonhéhe nicht stetig weiter von der urspriinglichen Frequenz 
entfernt. Probieren Sie folgendes aus: 


ENT -6,3,1,1 
SOUND 1,142,98,12,,6 


Sie werden merken, da8 die Frequenz dieses Tones rapide abnimmt, weil die 
Tonperiode mit jeder Wiederholung der Hiillkurve um 3 zunimmt, und das 30 Mal 
(90/3). Dieser Effekt la8t sich gut zur Erzeugung trillernder und heulender Tone 
nutzen: 


ENT -7,20,1,1,280,-1,1 
SOUND 1,1880,400,12,,7 


ENT -8,60,-1,1,66,1,1 
SOUND 1,1886,480,12,,8 
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Es kénnen 15 verschiedene Ton-Hiillkurven definiert werden (Bereich 1 bis 15), 
wobei ein negativer Wert angibt, daB die Hullkurve sich wiederholen soll. Die 
‘Anzahl der Stufen’, ein Wert, der an erster Stelle in jedem Abschnitt genannt 
wird, kann zwischen 0 und 239 betragen. Wie bei der Lautstarken-Hillkurve 
liegt die ‘Stufengrofe’ zwischen -128 und 127, und der Wert fir ‘Zeit pro Stufe’ 
zwischen 0 und 255. Und wie der ENV-Befehl kann der ENT-Befehl aus bis zu 
fiinf Abschnitten bestehen, die mit jeweils drei Werten definiert werden. 


Als siebter und letzter Teil des SOUND-Befehls kann ein Wert angegeben werden, 
der die Art des Rauschens bestimmt, das den Ton begleiten soll. Wenn Sie ein 
Rauschen einbauen wollen, miissen Sie daran denken, da8 dafir nur ein Kanal 
zur Verfiigung steht, d.h. jeder neue Wert fiir das Rauschen beendet das vorherige 
Rauschen. 


Das Rauschen kann dazu dienen, den Klang eines Tones abzuwandeln, oder es 
kann fur sich eingesetzt werden. In letzterem Falle mu8 der zweite Teil des 
SOUND-Befehls (‘Tonperiode’) @ lauten, damit lediglich das Rauschen zu héren 
ist. Mit dieser Methode lassen sich Schlagzeug-artige Gerdusche erzeugen. Héren 
Sie sich dazu folgendes Beispiel an: 


ENT ~-3, 
ENV 9,1 
FOR a=1 


pa lig 
Dg gl 


2 , 
5 , 
@: SOUND 1,4800,0,0,9,3,15: NEXT 


ell 72 
gig ly 
TO 1 


Ks klingt ungefahr wie ein fahrender Zug. Sie haben sicherlich bemerkt, da8 in 
diesem Beispiel beide Hiillkurven definiert wurden, und im SOUND-Befehl ein 
Wert fiir das Rauschen enthalten ist. 


Sowohl fiir ‘Dauer’ als auch fir ‘Lautstarke’ wurde im SOUND-Befehl @ 
angegeben, da beide Werte schon in der Lautstarke-Hillkurve enthalten sind. 


Da Sie nun hoffentlich die Befehle ENV, ENT und SOUND richtig beherrschen, 
wollen wir noch verschiedene andere verwandte Kommandos und Funktionen 
betrachten. 


Sie wissen, da8 durch die Addition von 64 zum Wert fir ‘Kanalnummer’ der Ton 
in einen Wartezustand versetzt wird, bis er durch den Befehl RELEASE 
‘losgelassen’ wird. Im Befehl RELEASE wird eine Bit-signifikante Zahl 
angegeben. Jedes Bit dieser Zah] ist ein Indikator fur einen der drei Kanale. Sie 
brauchen die Zusammenhange auch hier nicht bis in alle Einzelheiten zu 
verstehen; es geniigt, wenn Sie folgendes beachten: 


4 bedeutet Kanal C 
2 bedeutet Kanal B 
1 bedeutet Kanal A 
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Mehrere Kanale kénnen gleichzeitig freigegeben werden, wenn man die Werte fiir 
jeden dieser Kandale addiert. Um also Tone auf allen drei Kandlen freizugeben, 
mute der Befehl: 


RELEASE 7 


..Jauten, da 1+2+4=7 ergibt. Ist keiner der Kanale gesperrt, wird RELEASE 
ignoriert. Probieren Sie folgendes aus: 


SOUND 1+64,98 
SOUND 2+64,148 
SOUND 4+64,215 
RELEASE 3: FOR t=1 TO 1080: NEXT: RELEASE 4 


Die Tone, die man nach diesen SOUND-Kommandos erwartet, sind erst zu héren, 
wenn das erste RELEASE die Kanale A und B freigibt. Nach einer Verzégerung 
wird auch Kanal C freigegeben. 


Daraus ergibt sich noch eine weitere Rendezvous-Technik fir mehrere Tone. 
Wenn einer Warteschlange, die sich (durch die hinzuaddierten 64) im 
Haltezustand befindet, ein Ton hinzugefigt wird, befindet nicht nur er sich im 
Wartezustand, sondern alle weiteren Tone, die in die Schlange eingereiht werden. 
Sind schlieBlich mehr als vier Téne in einer blockierten Schlange, pausiert der 
Computer, bis der Kanal freigegeben wird - etwa durch ein Unterprogramm, das 
nach einer bestimmten Zeit (mittels AFTER oder EVERY) aufgerufen wird. Dies 
ist jedoch keine besonders gute Methode, das SOUND-System zu nutzen, da das 
Programm mit den SOQUND-Anweisungen von Zeit zu Zeit pausiert, um die 
Warteschlangen aufzufiillen. Dasselbe passiert, wenn viele lange Téne direkt 
aufeinander folgen. Probieren Sie folgendes Programm aus: 


18 FOR a=1 TO 8 

28 SOUND 1,100*a,2086 
36 NEXT 

40 PRINT "hallo" 

run 


Sie merken, da8B hallo nicht sofort auf dem Bildschirm erscheint, sondern erst 
nach etwa drei Sekunden. Dies liegt daran, da die Programmausfihrung solange 
blockiert ist, bis in der Schlange ein Platz frei ist. 


BASIC hat einen Unterbrechungsmechanismus, der ahnlich funktioniert wie 
nach AFTER und EVERY, oder nach ON BREAK GOSUB. Er versetzt Sie in die 
Lage, ein Ton-erzeugendes Unterprogramm zu benennen, das nur dann 
aufgerufen wird, wenn in der erforderlichen Schlange ein Platz frei wird. Beispiel: 
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10 a=0 

26 ON SQ(1) GOSUB 1888 

3@ PRINT a; 

48 GOTO 3@ 

1600 a=at+10 

1818 SOUND 1,a,280 

1020 IF a<2@@ THEN ON SQ(1) GOSUB 1080 
10830 RETURN 

run 


Sie werden merken, dafi dieses Programm keine Pause macht. Der SOUND-Befehl 
kommt nur zum Zuge, wenn die Warteschlange von Kanal A (Nummer 1) einen 
freien Platz hat. Der Befehl ON $Q(1) GOSUB, deckt diesen Tatbestand auf. 
Er lost einen Unterbrechungsmechanismus aus, der das in Zeile 1009 
beginnende Ton-Unterprogramm aufruft, wenn im angegebenen Kanal ein Platz 
frei wird. Wurde das Unterprogramm einmal ausgefiihrt, mu3 ON SQ GOSUB 
wieder aktiviert werden. Das geschieht mit Zeile 182@ im Unterprogramm. In 
diesem Beispiel wird das Unterprogramm nur dann wieder aufrufbereit, wenn der 
Wert fiir a unter 200 liegt. 


In einem richtigen Programm, das Objekte auf dem Bildschirm hin- und 
herbewegt, oder Zahlen addiert, kann im Hintergrund standig eine Melodie 
spielen, wenn man ein Unterprogramm aufrufen lat, das jede Note nur dann 
spielt, wenn in der Warteschlange ein Platz frei ist. Dadurch wird verhindert, da8 
das Programm pausiert, um auf einen freien Platz zu warten. Wenn dabei die 
Notenwerte fiir die Melodie von einer DATA-Anweisung gelesen werden, kann 
das Ton-Unterprogramm so verfaft werden, daf kurz vor Ende der Daten der 
Re-Aktivierungsprozefi gestoppt wird. 


Beim Befehl ON SQ() GOSUB kann entweder 1, 2 oder 4 in die Klammern 
gesetzt werden, je nachdem, welche Schlange auf freie Platze hin untersucht 
werden soll. 


BASIC hat au8erdem die Funktion $Q(). Sie informiert tiber einen der drei 
Tonkanale. Die Zahl in Klammern, wiederum 1, 2 oder 4, gibt den Kanal an, tiber 
dessen Zustand die Information gewinscht wird. Die Funktion gibt eine 
Bit-signifikante Zahl aus, die Sie nur mit Kenntnissen tiber das bindre 
Zahlensystem verstehen konnen. Die Bits im ausgegebenen Wert haben folgende 
Bedeutung: 
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BIT DEZIMAL BEDEUTUNG 


0,1,2 1,2,4 Anzahl der freien Platze in der Warteschlange 
3 8 Note am Kopf der Schlange ist fir Rendezvous mit A vorgesehen 
4 16 Note am Kopf der Schlange ist fiir Rendezvous mit B vorgesehen 
5 32 Note am Kopf der Schlange ist fiir Rendezvous mit C vorgesehen 
6 64 Fir oberste Note der Schlange ist Halte-Bit 

gesetzt (Kanal ist blockiert) 
vi 128 Es wird gerade eine Note gespielt 


Lassen Sie dieses einfache Beispielprogramm laufen: 


18 SOUND 2,200 
20 x=Sa(2) 

38 PRINT BINS(x) 
run 


Sie erhalten als Ergebnis die Binarzahl 180801@@, in dem Bit 7 gesetzt ist. Das 
bedeutet, da8 der Ton in dem Augenblick gespielt wurde, als die $Q-Funktion 
bearbeitet wurde. Die letzten drei Stellen 188 ergeben als Dezimalwert 4. Damit 
wird ausgesagt, da8 in der Schlange drei Platze frei waren. Die Funktion $Q wird 
eingesetzt, um an einer bestimmten Stelle im Programm den Zustand der 
Warteschlange eines Kanals zu erfahren. Im Gegensatz dazu _ testet 
ON $Q() GOSUB nicht nur den Zustand einer Warteschlange, sondern springt 
auch gegebenenfalls in ein Unterprogramm. 


In den bisherigen Beispielen wurden nur einzelne Tone erzeugt. Méchte man eine 
ganze Gruppe von Toénen fiir eine Melodie erzeugen, so kann man die 
gewtinschten Noten in einer DATA-Anweisung auflisten, von wo aus sie mit 
READ in einen SOUND-Befehl eingelesen werden: 


10 FOR Oktave=-1 TO 2 

26 FOR x=1 TO 7: REM Noten pro Oktave 
36 READ Note 

4@ SOUND 1,Note/2?8'Oktave 

5@ NEXT 

68 RESTORE 

78 NEXT 

8B DATA 426,379,358,319,284,253,239 


Das letzte Beispielprogramm dieses Abschnitts ist zwar viel komplizierter, basiert 
aber auf demselben Prinzip. Melodie und Rhythmus spielen auf Kanal A und B, 
wobei der Takt durch das Rendezvous eingehalten wird. Das Beispiel zeigt eine 
der Moglichkeiten auf, um DATA so zu strukturieren, da} Informationen tber 
Note, Oktave, Lange und Rendezvous darin enthalten sind: 
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18 REM Zeile 188 erzeugt Melodie im Violin-Schlussel 

20 REM Zeile 198 erzeugt Melodie im Bass-Schlussel 

30 DIM scaleZ(12):FOR xh%=1 TO 12:READ scaler(x%) = NEXT 

49 chi1“Z=1:READ chi1$:ch2%=1:READ ches 

5@ CLS 

68 Spd%=12 

78 scale$=""a-b b ct+c d-e e f+f gtg" 

80 ENV 1,2,5,2,8,-1,18,18,0,15 

90 ENV 2,2,7,2,12,-1,10,180,0,15 

108 ENT -1,1,1,1,2,-1,1,1,1,1 

11@ DEF FNMS(s$,s)=MID$(s$,5,1) 

128 ch1%Z=1:GOSUB 208 

138 ch2%=1:GOSUB 388 

148 IF chiz+ch2%>8 THEN 148 

15@ END 

168 DATA &777,8&70c,&6a7,&647,85ed ,&598 

178 DATA &547,84fc,&4b4,8476,8431,8&3f4 

180 DATA 4cr4f4fifig1A1-BeCef4g2g1A1-Bé6éA2Crifigifigial- 
biA1-b2C2g2A2g2figia2g2fée2c2e2c2g2e2ci-BlA2g2f4e4dd 
8c4F3Ff1c2d4-b2fr2-B2A2g2f6e2gr4C4-Blalfi-big2c2-b4a 
4g4fr6A2A2-B4-B2Ar2-B2A2g2fbe2g4C4-B1A1f1-B1g2C2-B4 
A4g8f. 

198 DATA r4f4F8f4e4c4FrBF4e2f2e4d2e2d8c8che2thghg8edt 3f 
1c4dr8g4cr4ée4c6f2d4c4c8fr8-e4dr8g8c4e4c6f2d4c4c8ft. 

208 REM sendet Ton zum Kanal A 

218 p1S=FNM$Cch1$,ch1%) 

220 IF p1$<>"r" THEN r1%4=8:GOTO 2468 

230 r1KZ=16:chtsZ=chi%44+1:p1S=FNMS(ch1$,ch1%) 

240 IF pi$="." THEN ch1%4=@8:RETURN ELSE LIZ=VAL(p1$) 

258 chi4=ch1%+1 

268 niS=FNM$S(ch1$,ch1Z) 

278 chiz=chi%+1 

288 IF ni$="+" OR n1$="-" THEN 358 

298 n1$=" "t+n1$ 

308 nd1iZ=C(1t+INSTR(scale$,LOWERS(n1$)))/2 

310 IF ASCCRIGHT$(n1$,1))>96 THEN 01%=8 ELSE 01%=16 

328 SOUND 1+r1%,scalez(nd1%4)/01%,Spd%*l1%,0,1,1 

338 ON SQ(1) GOSUB 280 

348 RETURN 

358 n1$=n1$+FNMS$(ch1$,ch1%) 

368 chiz=ch1i4+1 

378 GOTO 388 

388 REM sendet Ton zum Kanal B 

398 p2S=FNMS(ch2$,ch2z%) 
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460 IF p2$<>"r" THEN r2%=8:G0TO 426 

410 r2nz=8:ch2%=ch2%t+1:p2S=FNm$(ch2$,ch2%) 

426 IF p2$="." THEN ch2%4=@:RETURN ELSE L2%=VAL( p2$) 
438 ch2%z=ch2a“r1 

440 n2S=FNMS(ch2$,ch2%) 

458 chez=ch2urt 

468 IF n2$="+" OR n2$="-" THEN 538 

478 n2gs=" "t+n2$ 

488 nd2xz=CitINSTR(scaleS$,LOWERS(n2$)))/2 

498 IF ASCCRIGHT$(n2$,1))>96 THEN o2%=4 ELSE 02%=8 
5@8 SOUND 2t+r2%,scalez(nd2%4)/02%,Spd%*l2%,6,2 

518 ON SQ(2) GOSUB 388 

526 RETURN 

538 n2$=n2$S+FNM$Cch2s,ches) 

548 ch2z=ch2“zti 

55@ GOTO 488 

run 


Bildlich gesprochen 


In diesem Abschnitt werden die graphischen Moglichkeiten des 6128 erlautert. 
Die wichtigsten Merkmale werden anhand eines Programmbeispiels beschrieben, 
das nach und nach erweitert wird. 


Zu Beginn teilen wir den Bildschirm in ein Text-Fenster (Zeile 4@) und ein 
Graphik-Fenster (Zeile 3) ein. Nebenbei bestimmen wir den Modus und zwei 
blinkende Farben (Zeile 2@). 


1@ REM mask und tag im Fenster 
2@ MODE 1:INK 2,18,4:INK 3,4,18 
3@ ORIGIN 440,100,4480,648,190,308 
40 WINDOW 1,26,1,25 

5@ CLG 2:GRAPHICS PAPER @ 


Wenn Sie dieses Programm laufen lassen, sehen Sie auf dem Bildschirm rechts 
auf halber Hohe ein Quadrat blinken. Es wird durch Zeile 5@ mit Farbstift Nr. 2 
(magenta/blaugriin) eingefarbt; der Koordinaten-Ursprung wurde mit ORIGIN 
in die linke untere Ecke des Quadrats verlegt und mit dem MO0DE-Kommando 
wurde der Graphik-Cursor auf den Koordinaten-Ursprung (X=0, Y=0) gelegt, so 
da8 wir mit Zeile 60 eine Diagonale durch das Quadrat ziehen konnen: 


60 DRAW 280,200,3 


Lassen Sie das erweiterte Programm laufen und fiigen Sie dann hinzu: 
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88 MOVE @,2:FILL 3 


Zeile 8@ riickt den Graphik-Cursor in eine der beiden Quadrat-Halften und fullt 
sie mit Farbstift 3 aus. Die Grenzen des ausgefiillten Bereiches werden vom Rand 
des Graphik-Fensters (in diesem Fall gleichbedeutend mit dem Rand des 
Quadrats) gebildet, sowie von Linien in der Farbe des Graphik-Pens (3) oder in 
der Farbe, mit der ausgefillt wird (ebenfalls 3). 


Lassen Sie dieses Programm jetzt laufen. 


Um die Sache mit der Flachenbegrenzung zu verdeutlichen, fiigen Sie Zeile 70 
hinzu (unten). Beachten Sie, daB der ausgefiillte Bereich nur deswegen auf die 
Halfte des Quadrats begrenzt wird, weil die Ausfill-Farbe dieselbe Farbe hat wie 
die Diagonale. 


76 GRAPHICS PEN 1 
run 


Andern Sie zum Beweis den FI LL-Farbstift in Zeile 88 um in 1, und lassen Sie 
das Programm laufen. Stellen Sie dann den urspriinglichen Zustand wieder her 
(FILL 3). 


Erganzen Sie das Programm jetzt um die Zeilen 19@ bis 148, mit denen ein 
Kasten gezeichnet wird: 


108 MOVE 20,20 
118 DRAW 188,28 
126 DRAW 180,186 
138 DRAW 28,180 
140 DRAW 28,26 
run 


Der Kasten wird wegen Zeile 7@ mit Farbstift 1 gezeichnet. Hatten wir Zeile 70 
ausgelassen, muBten wir entweder den Befehl MOVE in Zeile 1@@ oder den 
Befehl DRAW in Zeile 11@ um den dritten Parameter ‘,1’ erganzen, damit der 
Computer seine Graphik-Pens auswechselt. 


Punkt fiir Punkt... 


Linien mtissen nicht durchgezogen sein, sie kénnen auch gepunktet (geplottet) 
werden. Mit dem Befehl MASK kann man die Gréfe der Punkte bestimmen. Das 
Punktmuster wiederholt sich alle 8 Pixel, und jede Punktlinie setzt da an, wo die 
letzte aufgehort hat. Ein neuer MASK-Befehl (der méglicherweise denselben 
Parameter wie der gegenwartige hat) setzt ein neues Punkteschema, ohne das 
alte Muster einzubeziehen. 
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Das Punktmuster ist einfach eine achtstellige Binadrzahl, in der die Ziffer 1 
jeweils angibt, dai der Farbstift einen Punkt setzt. In unserem Beispiel wollen 
wir eine binadre Konstante (gekennzeichnet durch ‘&X’) verwenden, die angibt, 
daf} in der Mitte jeder Gruppe von 8 Pixeln vier Pixel gezeichnet werden sollen. 
Die beiden Pixel rechts und links davon bleiben unsichtbar. Auf diese Weise 
erhalten wir eine gestrichelte Linie aus je vier sichtbaren und vier unsichtbaren 
Pixeln: 


98 MASK &X881111088 
run 


Aber warten Sie! Die Linie zieht sich nicht gleichmaSBig um die Ecken herum. Das 
liegt daran, daf} jeder Eckpunkt zweimal geplottet wird - einmal als letztes Pixel 
der einen Linie, und zweitens als erstes Pixel der ndchsten Linie. Eine 
umstandliche Moglichkeit, diesen Effekt auszuschalten, ware folgende: 


115 MOVE 188,22 
125 MOVE 178,186 
135 MOVE 28,178 
run 


Wir haben jedoch eine einfachere Methode zur Verfiigung, indem wir dem 
MASK-Befehl den Paramter ‘,@’ anhangen. Dadurch wei der Computer, dafi er 
den ersten Punkt jeder Linie NICHT plotten soll. Andern Sie also Zeile 9@ um in: 


90 MASK &X@8111108,0 
...und léschen Sie die eben erganzten Zeilen, indem Sie einfach eintippen: 


115 
125 
135 


Wenn Sie das Programm in dieser Form laufen lassen, erhalten Sie einen 
symmetrisch gestrichelten Kasten. Ist der zweite Parameter nach MASK ‘,1’, so 
erhalten Sie ibrigens eine durchgezogene Linie, einschlieBlich des ersten Pixels. 


Sehen Sie sich jetzt einmal die Zwischenraume der gestrichelten Linien an. In 
dem Dreieck unten rechts sehen sie anders aus als im Dreieck oben links. Das 
kommt daher, weil der Hintergrund fiir das Dreieck unten rechts durch den 
Befehl CLG 2 in Zeile 5@ mit Farbstift 2 eingefarbt wurde, wahrend im Dreieck 
oben links die Hintergrundfarbe mit der Bildschirmfarbe tibereinstimmt. Andern 
Sie Zeile 58 um: 


5@ clg 2:graphics paper @ 
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..und lassen Sie das Programm wieder laufen. Nun ist die Hintergrundfarbe fiir 
den Kasten einheitlich. 


Wir haben die Méglichkeit, den Hintergrund fiir das Graphik-Fenster unsichtbar, 
oder mit dem Fachwort ‘transparent’, zu machen. Dies bedeutet, dafB die 
Zwischenraume einer gepunkteten Linie, die tiber eine bestehende Abbildung 
gezogen wird, erhalten bleiben. Die bestehende Abbildung wird an diesen Stellen 
unsichtbar gemacht, indem wir an die GRAPHICS PEN-Anweisung ‘,1’ 
anhangen. (Mit ‘,@’ wird der nicht-transparente Zustand wieder hergestellt.) 
Andern Sie also Zeile 7@ folgendermaBen um: 


7@ GRAPHICS PEN 1,1 


..und sehen Sie sich das Ergebnis an. 


Von der Position des Graphik-Cursors kénnen nicht nur durchgezogene und 
gepunktete Linien, sondern auch normale Textzeichen ausgehen. Dies hat den 
Vorteil, das man die Textzeichen viel genauer plazieren, d.h. Pixel-weise statt 
8-Pixel-weise verschieben kann. Zum anderen lassen sich dadurch die 
Graphik-Farbstift-Modi (siehe unten) auch auf Textzeichen anwenden. 


Um Zeichen an die Position des Graphik-Cursors zu setzen, schieben Sie den 
Graphik-Cursor an die Stelle, wo der linke obere Rand des Zeichens erscheinen 
soll. Dann geben Sie den Befehl TAG (oder TAG#1 usw. fiir andere Text-Fenster) 
ein, und danach die tiblichen PRINT-Anweisungen. Der Graphik-Cursor riickt 
nun automatisch nach jedem Zeichen um 8 Pixel nach rechts. Figen Sie hinzu: 


168 MOVE 64,108 
178 TAG 

188 PRINT "Peter" 
198 TAGOFF 

run 


(BASIC gibt seine Meldungen immer auf den Text-Bildschirm aus, gleichgiltig, 
ob auf TAG oder TAGOFF geschaltet ist. Trotzdem ist es zu empfehlen, TAG nach 
Beendigung seiner Tatigkeit auszuschalten.) 


Was haben aber die Pfeile nach Peter zu bedeuten? Nun, dies sind Symbole fir 
Wagenrticklauf CHR$(13) und Zeilenvorschub CHR$(19). Die Software fiir 
die Graphik tibersetzt die ersten 32 ASCII-Zeichen in ihre druckbare Version (als 
wurde ihnen immer CHR$(1); vorangestellt, wenn sie zum Text-Bildschirm 
geschickt werden). Dies hat seinen Grund darin, da die meisten der ersten 32 
Steuer-Zeichen nur fur den Text-Bildschirm von Bedeutung sind. Deshalb wird 
auch nicht in der folgenden Zeile weitergemacht, wenn wir tber den rechten 
Rand des Graphik-Fensters hinausgehen. 
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Diese Pfeile konnen wir verhindern, wenn wir die PRINT-Anweisung einfach mit 
einem Semikolon abschliefen: 


18@ PRINT "Peter"; 
run 


Fiir einen Text, der unter Verwendung von TAG auf dem Graphik-Bildschirm 
geschrieben wird, gelten dieselben GRAPHICS PEN-Befehle wie fiir das 
Zeichnen von Linien. Der Name, den wir gerade auf den Graphik-Bildschirm 
ausgeben liefen, wurde deshalb mit GRAPHICS PEN 1 geschrieben und ist 
transparent. Mit dem Befehl: 


15@ GRAPHICS PEN 1,0 
run 


..machen wir das ‘Papier’ nicht-transparent, wahrend durch: 
15@ GRAPHICS PEN @,1 


..mit Farbstift 0 im Transparent-Modus geschrieben wird. 


Léschen Sie Zeile 15@ wieder und lassen Sie das Programm noch einmal laufen. 
Der in Zeile 7@ angegebene Zustand (Farbstift 1 und Transparent-Modus fir den 
GRAPHICS PEN) ist nun wieder hergestellt. 


Transparente Schrift 


Sie konnen auch auf dem Text-Bildschirm transparente Zeichen darstellen, indem 
Sie einen der Steuer-Codes verwenden. Fiigen Sie hinzu: 


288 PRINT #2,CHR$(22);CHRS$(1) 

218 LOCATE #2,32,14:PRINT #2,"xexxKR" 
220 LOCATE #2,32,14:PRINT #2,"------ " 
238 PRINT #2,CHRS$(22);CHRS(B) 

run 


Zeile 2@@ setzt den Bildschirmbereich #2 in den Transparent-Modus. Beachten 
Sie, wie die Sternchen unterstrichen werden. Dies zeigt, da8 man Zeichen 
tbereinander lagern kann, sogar in verschiedenen Farben. Zeile 23@ schaltet 
wieder auf Nicht-Transparent-Modus um. 
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Farbstift-Modi 


Es besteht die Méglichkeit, in einem Graphik-Farbstift-Modus zu zeichnen, der 
das gegenwartig Gezeichnete mit dem Farbstift, der schon auf dem Bildschirm ist, 
kominiert. Die Farbe, in der das Pixel letztendlich dargestellt wird, wird 
errechnet, indem der alte Farbstift fir das Pixel mit dem Farbstift fur 
GRAPHICS PEN oder PAPER logisch verknipft wird. Die logischen 
Verkniipfungen werden mit XOR, AND und OR hergestellt. Der Farbstift-Modus 
kann entweder als vierter Parameter in den Befehlen DRAW/DRAWR, PLOT/ 
PLOTR und MOVE/MOVER angegeben werden, oder als Steuer-Code-Folge 
CHR$( 23); CHR$(<Modus>) in einem PRINT-Befehl. In allen Fallen bewirkt 
der Wert 1 ein Plotten gemaB XOR, der Wert 2 gemaéS8 AND und der Wert 3 
gemafi OR. Der Wert 0 stellt den ‘Zwangs’-Modus wieder her, bei dem der 
gewohnliche Graphik-Farbstift verwendet wird. 


Im nachsten Beispiel wird mit einer XOR-Verknipfung gearbeitet. XOR wird 
gerne in der sogenannten Schildkréten-Graphik angewendet, da es die 
Eigenschaft hat, durch zweimaliges Zeichnen des selben Musters das 
urspriingliche Bild wiederherzustellen. Das Unterprogramm, welches das 
Quadrat zeichnet, wird also zweimal durchgefihrt (in Zeile 118 und 138), und 
auch das mittels TAG dargestellte Zeichen wird zweimal produziert (in Zeile 
178 und 19@). Die FRAME-Kommandos erzeugen eine ausreichende 
Verzégerung, um die Wirkung sichtbar zu machen. Beachten Sie, da3 in den 
Anweisungen in Zeile 9@ der erste Parameter ausgelassen wurde. Das ist in 
diesen Befehlen ohne weiteres mdglich; dadurch bleiben die vorher gesetzten 
Werte fiir diesen Parameter giltig. 


Der dritte Parameter des MOVE-Befehls (,1) in Zeile 228 setzt den 
GRAPHICS PEN auf 1 und tberschreibt somit die ‘3’ in Zeile 68. Der 
XOR-Modus wird durch den vierten Parameter von DRAWR in Zeile 23@ gesetzt. 
Beachten Sie auch hier den fehlenden Parameter. 


Wenn Sie den MASK-Befehl in Zeile 9@ weglassen, wird der erste Punkt in jeder 
Linie geplottet, d.h. die Ecken werden doppelt gezeichnet. Durch XOR heben sich 
die doppelten Punkte auf; deswegen sind die Ecken verschwunden. 


1@ REM XOR ink modes 

20 MODE 1:INK 2,1@:1INK 3,4 

30 ORIGIN 4486,108,440,640,100,300 
4Q@ WINDOW 1,26,1,25 

5@ CLG 2:GRAPHICS PAPER @ 

68 DRAW 200,208,3 

70 MOVE 2,0:FILL 3 

88 ORIGIN 440,0,440,640,0,400 
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96 GRAPHICS PEN ,1:MASK ,@ 

100 FOR y=68 TO 318 STEP 2 

118 GOSUB 2208 

128 FRAME:FRAME 

138 GOSUB 220 

148 NEXT 

158 TAG 

168 FOR y=6@ TO 318 STEP 2 

178 MOVE 96,y:PRINT CHRS$(224); 
180 FRAME: FRAME 

198 MOVE 96,y:PRINT CHR$(224); 
200 NEXT 

210 END 

226 MOVE 90,y,1 

2308 DRAWR 26,0,,1 

248 DRAWR 8,20 

258 DRAWR -20,0 

268 DRAWR 6,-20 

27@ RETURN 

run 


Bewegungseffekte 


Durch wechselnde Farben fur einen Farbstift lassen sich Bewegungseffekte 
erzielen. Obwohl der Inhalt des Bildschirmspeichers unverandert bleibt, scheint 
es auf dem Bildschirm eine Bewegung zu geben. Ein Beispiel daftir finden Sie im 
‘Welcome’-Programm auf Seite 4 Ihrer Systemdisketten (Tippen Sie 
RUN "disc" ein, um dieses Programm abzuspielen.) 


Der einfache Farbwechsel] in diesem Beispiel reicht jedoch nicht aus, wenn die 
Muster sich tberlappen sollen. Im nachsten Beispiel werden die Farbwerte durch 
OR verkniipft, um die Zahlen 1 bis 4 auf den Bildschirm zu bringen. Die Form 
wird bestimmt, indem das Zeichen links unten abgetastet und als groke 
Blockgraphik wiedergegeben wird. Die Nummern werden unter Verwendung der 
Farbstifte 1, 2, 4und 8 mit eingeschaltetem 0R-Modus abwechselnd geschrieben 
-in diesem Fall mit der Steuer-Zeichen-Folge, siehe Zeile 5@. 


Ab Zeile 6@ rotiert die Palette entsprechend einer mathematischen Formel, die 
bewirkt, da immer eine Blockgraphik-Nummer dargestellt wird. Die Auswahl 
des Farbstifts erfolgt, indem der Reihe nach jeder Farbstift untersucht wird, um 
festzustellen, ob er die gesuchte binare Komponente enthalt. Die Nummer drei 
wurde z.B. mit Farbstift 4 gezeichnet; deshalb muf&ten wir, um die Zahl 3 
darzustellen, allen Farbstiften, deren Nummer eine binadre 4 enthalt, eine 
sichtbare Farbe zuordnen. Diese Farbstifte sind: 
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4(0100), 5(0101), 6(0110), 7(0111), 12(1100), 13(1101), 14(1110), 15(1111) 


In einer praktischen Anwendung wiirden die Farbstifte berechnet, die in jedem 
Bewegungsstadium zu wechseln sind, und die Zeilen 189 bis 20@ wirden durch 
einen zigigeren Programmteil ersetzt. 


1@ REM Latch animation 

20 ON BREAK GOSUB 229 

38 FOR i=1 TO 15:INK 1,26:NEXT 

46 mO1)=1:m(2)=2:m(3)=4:m(4) =8 

5@ MODE @:PRINT CHRS$(23);CHRS(3);:TAG 

60 FOR P=1 TO 4 

7@ GRAPHICS PEN m(p),1 

86 LOCATE #1,1,25:PRINT#1,CHR$(48+p); 

90 FOR x=@ TO 7 

100 FOR y= @ TO 14 STEP 2 

116 IF TEST(x*4,y)=8 THEN 146 

120 MOVE (x+6)*32,(y+6)*16:PRINT CHRS$(143); 
138 MOVE (x+6)*32,Cy+7)*16:PRINT CHRS$(143); 
148 NEXT y,x,p 

15@ LOCATE #1,1,25:PRINT#1," "; 

168 FOR p=1 TO 4 

170 FOR i= 1 TO 25:FRAME:NEXT 

188 FOR i=@ TO 15 

196 IF €i AND m€p))=@ THEN INK 1,8 ELSE INK 1,26 
2060 NEXT i,p 

218 GOTO 168 

2208 INK 1,26 


Bild-Ebenen mit verschiedenen Farben 


Im obigen Beispiel haben wir gesehen, wie in den mit den Farbstiften 1, 2, 4 und 
8 gezeichneten Graphiken ein Bewegungseffekt durch Farbwechsel entstand. 
Wenn wir dieselben Farbstifte benutzen, aber die Farben in anderer Weise 
bestimmen, entsteht ein vollig anderer Effekt mit verschiedenen Farbebenen. 
Folgendes Beispiel soll dies demonstrieren: 


18 REM Berge 

20 DEFINT a-z 

30 INK @,1:INK 1,26 
40 INK 2,6:I1NK 3,6 
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50 FOR i=4 TO 7:INK i1,9:NEXT 

6@ FOR i=8 TO 15:INK i1,20:NEXT 

76 MODE @:DEG:ORIGIN @,150:CLG:MOVE 0,150 

80 FOR x=16 TO 648 STEP 16 

90 DRAW x,COS(x)*150+RND*100,4 

180 NEXT 

110 MOVE @,@:FILL 4 

128 cx=175:GOSUB 3286 

1308 cx=525:GOSUB 320 

140 SYMBOL 252,0,0,8C,81F ,&830,8&7F,&FF 

15@ SYMBOL 253,0,6,&8E,&F2,2,8&F2,&FE 

168 SYMBOL 254,0,860,8&70,&7F,&7F,&7F,&7F 

178 SYMBOL 255,0,0,0,8F8,&EC,&FE,&FF 

188 prS=CHRS(254)+CHRS$(255) 

198 pl$=CHR$(252)+CHR$(253) 

208 TAG:t!=TIME 

210 FOR x=-32 TO 640 STEP 4 

228 x2=((608-x)*2)M0D 640:hL=RND*1B:hr=5O*SIN(x) 
230 GRAPHICS PEN 8,1:MOVE x,100+hr,,3:PRINT prs; 
240 GRAPHICS PEN 2,1:MOVE x2,115+hl,,3:PRINT pl$; 
258 IF (TEST(x2-2,115+hl-12) AND 8)=8 THEN 380 
260 IF TIME-t!<3@ THEN 260 

270 FRAME:t!=TIME 

280 GRAPHICS PEN 7,1:MOVE x,1@@+hr,,2:PRINT pr$; 
298 GRAPHICS PEN 13,1:MOVE x2,115+hl,,2:PRINT pl$; 
308 NEXT 

316 GOTO 210 

320 MOVE cx,100 

330 FOR x=8 TO 36@ STEP 10 

340 DRAW cx+SIN(x)*50+1G*RND,100+COS(x)*25+1Q*RND,1 


35@ NEXT 
360 DRAW cx,1@0:MOVE cx,9O:FILL 1 
376 RETURN 


388 ENT -1,1,1,1 

398 SOUND 1,25,400,15,,1,15 

4086 FOR y=1@@+thr TO -132 STEP -2 

410 GRAPHICS PEN 7,1:MOVE x,y,,2:PRINT prs; 
420 GRAPHICS PEN 8,1:MOVE x,y-2,,3:PRINT pr$; 
430 NEXT 

448 GOTO 78 
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Um uns klar zu machen, wie das Programm funktioniert, miissen wir uns die 
Farbstift-Nummer wieder als Binarzahl vorstellen. Beginnend mit der héchsten 
Farbstift-Nummer (15) werden alle Farbstifte, die das Bit fiir die Zahl 8 enthalten 
(15 bis 8) mit dem Befehl I NK auf blaugriin gesetzt. Dann werden alle Farbstifte, die 
das Bit fiir 4 enthalten (7 bis 4), auf griin gesetzt. Die Farbstifte 2 und 3, die jeder das 
Bit fir 2 enthalten, werden auf rot, und Farbstift 1 schlieBlich wird auf leuchtend 
weil gesetzt. Farbstift 0 bleibt blau. 


Mit OR werden die Graphiken auf dem Bildschirm an ihren Platz geriickt - siehe 
Zeile 238 und 249. Die Farbe fir jedes Pixel wird durch das Bit bestimmt, das an 
dieser Position im Ergebnis die héchste Signifikanz aufweist. Deshalb wird ein Bild 
einer ‘signifikanteren’ Ebene immer das Bild einer ‘weniger signifikanten’ Ebene 
uberdecken. Der Hintergrund bleibt aber erhalten und wird wieder sichtbar, wenn 
das ‘signifikantere’ Bild entfernt wird. Um eine Bildebene zu entfernen, plottet man 
das Bild mit dem AND-Farbstift-Modus unter Verwendung der I NK-Farben 7, 11, 13 
oder 14, wobei die vorherigen I NK-Farben 8, 4, 2 und 1 jeweils geléscht werden -siehe 
Zeile 288 und 299. 


Zusatzlicher Speicherplatz fir 
Graphik-Programme 


Wir schlieBen dieses Kapitel mit einem umfassenden Programm ab, mit dem Sie ihre 
eigenen Bilder entwerfen kénnen. Dazu wird der zusatzliche 64K RAM-Speicher des 
6128 beansprucht: 


18 'SCREEN DESIGNER von DAVID RADISIC 

28 ' copyright (c) AMSOFT 1985 

38 ' 

46 'Vor diesem Programm das "BANKMAN" -Programm laufen lassen 

50 CESS SE SSCL OSES SSCS SSS S SSCS SC SSC SSCL SSS TCSSCCCLS TCC LCST SY 

68 ' 

78 ON ERROR GOTO 2748 

8@ DEFINT a-x 

98 MODE 1:ch=127:cmnd=1:pn(8)=8:pn(1)=26:pn(2)=15:pn(3) 
=6:pn(4)=8: pn=1:norx=1:menu=1:2z2Z=HIMEM 

108 DIM command$(22) 

118 norx$(B)="Normal":norx$(1)="XOR "snorx$(2)="Trans 
p":norx$(3)="XOR u 

120 RESTORE:READ cmnds$(1),cmnds$(2):cmnd$=CHR$(16)+CHR 
$(&7F)+cmnds$(1)+cmnds$(2) 

138 READ cmno:FOR i=1 TO cmno:READ command$(i)=:NEXT 

148 READ st$:IF st$<>"*x*" THEN cmnd$(cmnd)=st$:cmnd=cmn 
d+1:GOTO 148 

158 WINDOW #8,1,40,1,3:PAPER #0,0:PEN #0,1:CLS #8 
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Wenn Sie 


WINDOW #1,1,40,4,4:PAPER #1,3:PEN #1,1:CLS #1 
ORIGIN @,0,0,6480,0,334 

x=320:y=2OO:MOVE x,y 

BORDER pn(4):FOR i=@8 TO 3:INK i,pn(i):NEXT 

MASK 255,@:PAPER @:PEN 1:PAPER #1,3:PEN #1,1:GRAPHI 
CS PEN pn,norx 

IF flag<>S THEN 288 

IF pn<2 THEN pntS$=CHRS$(240) :px=(pn+1)*13 ELSE IF pn 
<4 THEN pnt$=CHR$(241) :px=(pn-1)*13 ELSE pnt$S=CHRS( 
243): px=37 

LOCATE px,2:PRINT pnt$; 

LOCATE 1,1:PRINT USING" PEN @ : ## PEN 1 : ##"; 
pn(@);pn(1); 


LOCATE 29,2:PRINT USING"Border : ##";pn(4) 

LOCATE 1,3:PRINT USING" PEN 2 : ## PEN 3 : ##"; 
pn(2);pn 3); 

LOCATE px,2:PRINT " "; 

LOCATE #1,1,1:PRINTH1,USING"X :#### Y :#### 
x;y;:PRINT #1,"Plot mode : ";norx$(norx+(undraw*2) ) 


IF flag=@ THEN GOSUB 2268 


GOSUB 978 

IF flag>@ THEN 396 

IF i$="" THEN 396 
cmnd=INSTR(cmnd$,i$):1F cmnd=@8 THEN 398 
IF cmnd=1 THEN CLG:x=32@:y=288:G0TO 396 
IF cmnd=2 THEN RUN 76 

ON cmnd-2 GOSUB 1248,14189,1520,1648,1848,1860,1950, 
2020,2090,2120,2170,22008,2660,2668,2668,2660,2398,2 
330,2200 

IF tx=@ AND ty=@ THEN 200 

IF flag>@ THEN 448 

GOSUB 639 

GOSUB 680:FRAME:GOSUB 686 

GOTO 200 

MOVE tempx,tempy,pn,1 

ON flag GOSUB 470,490,558,648 

GOTO 200 

PLOT x,y:GOSUB 630:PLOT x,y 

RETURN 

DRAW tempx+x,tempy:DRAW tempxtx,tempyty 
DRAW tempx,tempy+ty:DRAW tempx,tempy 
GOSUB 638 

DRAW tempx+x,tempy:DRAW tempx+x,tempyty 
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966 
976 


DRAW tempx,tempy+ty:DRAW tempx,tempy 
RETURN 

MOVE tempx,tempy:DRAWR x,y 

IF triside=@ THEN 58@ 

DRAW tempxx,tempyy:DRAW tempx,tempy 
GOSUB 638 

MOVE tempx,tempy:DRAW tempx+x,tempyty 
IF triside=@ THEN RETURN 

DRAW tempxx,tempyy:DRAW tempx,tempy 
RETURN 

X=x+txiy=ytty: RETURN 

MOVE tempx,tempy:DRAW x,y 

GOSUB 638 

MOVE tempx,tempy:DRAW x,y 

RETURN 

" draw and undraw cursor 

IF flag=5 THEN RETURN 

MASK 255,1 

IF flag>1 THEN xx=tempx+x:yy=tempyty ELSE xx=x:tyy=y 
IF flag=4 THEN xx=x:yy=y 

IF flag=1 THEN xx=x!tyy=y 

IF undraw=1 THEN 826 

GOSUB 796 

MASK 255,86 

IF i$=" " THEN GOSUB 215@:i$="" 
RETURN 

MOVE xx-4,yy,pn,1:DRAW xxt4,yy 

MOVE xx,yy-4:DRAW xx,yyt4 

MOVE xx,yy,,xorn:RETURN 

nx=1:GOSUB 1226 

FRAME:GOSUB 1229 

IF i$=" " THEN nx=norx:GRAPHICS PEN pn,1:GOSUB 12286 
i$="" 

IF flag<>6 THEN 76@ 

IF moved=@ AND j$<>"" AND (j$<CHRS(248) OR j$>CHRS( 
247)) THEN ch=ASC(j$):moved=1 

IF moved=@ THEN RETURN 

LOCATE 5,2 

FOR i=ch-5 TO cht5 

PEN ABS(i<>ch)+1 
ChS=CHRS(C1)+CHRSCABSC1+256)M0D 256) 
IF ch=i THEN PRINT" "ch$" "; ELSE PRINT ch$; 
NEXT 

PEN 1:PRINT" Sten) ts 

GOTO 768 

ty=O8:tx=@:GOSUB 680:FRAME:GOSUB 688 
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986 IF INKEY(@)<>-1 OR INKEY(72)<>-1 THEN ty=16 
99H IF INKEY(2)<>-71 OR INKEY(73)<>-1 THEN ty=-16 


1006 
1816 
1020 


1030 
19408 
1858 
1866 
1870 
1088 
1096 
1188 
1118 
1128 
1136 


1148 


1158 
1166 
1178 
1188 
1198 
1200 
1216 
1220 
1238 
1248 
12568 
1260 
1276 
1286 
1290 
1308 
1318 


1320 
1338 
1348 
1358 
1368 
1378 
1380 
139@ 


IF INKEY(8)<>-1 OR INKEY(74)<>-1 THEN tx=-16 

IF INKEY(1)<>-1 OR INKEY(75)<>-1 THEN tx=16 

IF INKEY(21)<>-1 OR INKEY(76)<>-1 THEN tx=tx/8:ty= 
ty/8 

IF tx=@ AND ty=@ THEN moved=@ ELSE moved=1 
jJS=INKEYS: i1S$=UPPERS(j$) 

IF Ci$=" " OR i$=CHRS$(13)) AND flag>@ THEN 1098 
IF flag=5 THEN 1120 

IF flag=6 THEN 1178 

RETURN 

ON flag GOSUB 1248,1410,1648,1860,1958,2020 
ig="" 

RETURN 

IF moved=@ THEN RETURN 

IF tx>2 THEN pn=(pn+1) MOD 5 ELSE IF tx<-2 THEN pn 
=ABS((Cpn<1))*5-1+pn 

IF ty>2 THEN pn(€pn)=(pn(pn)+1) MOD 27 ELSE IF ty<- 
2 THEN pn(pn)=ABS(Cpn(pn)<1))*27-1+pn(pn) 
GRAPHICS PEN pn:PEN #1,pn 

tx=@:ty=O8:BORDER pn(pn):RETURN 

IF tx<@ THEN ch=ABSCch+255) MOD 256 

IF ty<@ THEN ch=ABS(ch+246) MOD 256 

IF tx>@ THEN ch=(ch+1) MOD 256 

IF ty>@ THEN ch=(ch+1@) MOD 256 
tx=O:ty=O0:RETURN 

TAG:MOVE xx-8,yy+6,pn,nx:PRINT CHRS(ch);:TAGOFF 
RETURN 

' ¢ 

IF flag=1 THEN 1296 

ro=1:GOSUB 2248 

tempx=x:tempy=y:flag=1 

RETURN 

IF tempx=x AND tempy=y THEN 139@ 

PLOT x,y,,1 
tix=MAX(x,tempx)-MINCtempx,x):tiy=MAX(y,tempy)-MIN 
(tempy,y) 

ti=SQRCC(tixfad+(tiyft2)) 

ORIGIN tempx,tempy 

PLOT 0,0,pn,@:MOVE @,-ti 

FOR 2=@ TCO P1I*2+8.01 STEP PI/(ti/2) 

DRAW SINCz+PI)*ti,COS(z+PI)*ti,pn,norx 

NEXT z 

ORIGIN 6,6 
x=tempx:y=tempy:tempx=@:tempy=6: f lag=8 
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1488 RETURN 

1418 ' B 

1420 IF flag=2 THEN 1470 

1439 ro=2:GOSUB 2248 

1448 tempx=x:tempy=y:flag=2 

1458 x=O8:y=0 

1460 RETURN 

1470 IF norx=1 THEN 1580 

1480 MOVE tempx,tempy:DRAW tempxt+x,tempy,,norx 

1498 DRAW tempxtx,tempyty:DRAW tempx,tempyt+ty:DRAW tempx 
,tempy 

1588 x=tempx:y=tempy:flag=@ 

151@ RETURN 
t 


1520 F 
153@ ro=3:GOSUB 2248 
1546 GOSUB 162@:IF i$=" '" THEN 1688 


155@ edgecol=VAL(i$) 

1568 ro=4:GOSUB 2249 

1578 GOSUB 162@:I1F i$=" " THEN 1688 

1588 filler=VAL(i$) 

1598 MOVE x,y,edgecol:FILL filler 

1608 flag=O8:iS="" 

161@ RETURN 

1620 iS=INKEYS:IF (iS<"8" OR 1$>"3'") AND i$<>" " THEN 1 
620 

1638 RETURN 

1649 ' T 

1656 IF flag=3 THEN 17800 

1668 flag=3:r0=5:GOSUB 2240 

1678 tempx=x:tempy=y 

1688 x=O0:y=8 

1698 RETURN 

1706 IF triside<>@ THEN 1778 

1718 ro=6:GOSUB 2246 

1728 MOVE @,0,pn,1:GOSUB 598 

1736 tempxx=tempx+x:tempyy=tempyty:x=x/2:y=20 

1748 triside=1 

1758 GOSUB 55@:GOSUB 598 

1768 RETURN 

1778 IF norx=1 THEN 1808 

1788 MOVE tempxx,tempyy,,norx:DRAW tempx,tempy 

1798 DRAW tempx+x,tempy+y:DRAW tempxx,tempyy 

1800 tempxx=O:tempyy=8 

1818 x=tempx:y=tempy:triside=0 

1820 tempx=8:tempy=@: f lag=08 
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18308 RETURN 


1849 ' a 
1858 norx=1:undraw=undraw XOR 1:RETURN 
18609 ' L 


1870 IF flag=4 THEN 1918 

1880 ro=7:GOSUB 2249 

1890 tempx=x:tempy=y:flag=4 

1908 RETURN 

1919 IF norx=1 THEN 1930 

1920 MOVE tempx,tempy,,norx:DRAW x,y 

1930 x=tempx:y=tempy:flag=@ 

1948 RETURN 

1950 ' I 

1969 IF flag=5 THEN flag=@:CLS:INK 3,tmpcol:INK pn,col: 
GOTO 1998 

1970 CLS:flag=5:BORDER pn(pn) 

1988 RETURN 

1998 FOR i=@ TO 3:INK i,pnCi):NEXT: BORDER pn(4) 

2008 IF pn=4 THEN pn=1 

2610 CLS:RETURN 

2020 ' A 

2030 IF flag=6 THEN 2870 

2048 tempx=8:tempy=8:CLS 

2058 undraw=1:f lag=6:norx=1:moved=1 

2068 RETURN 

2070 flag=0 

2888 RETURN 

2098 ' N 

2108 norx=8 

211@ RETURN 

2120 ' E 

2138 GRAPHICS PEN pn,@:TAG:MOVE xx-8,yy+6,,0:PRINT " "; 
: TAGOFF 

2140 RETURN 

2158 '<SPACE> 

2168 PLOT x,y,pn,norx:RETURN 

2176 ' X 

2186 norx=1 

2198 RETURN 

2206 ' M 

221@ menu=menu MOD 2+1 

2220 GOSUB 22680:RETURN 

2238 iS=UPPERSCINKEYS):1IF i$="" OR INSTR(ser$,i$)=@ THE 
N 2238 ELSE RETURN 
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2246 


2258 
2260 
2278 
2280 
22908 


2300 
2316 
2320 
2330 
2340 
2358 
23668 
2376 
2388 
23968 
2480 
2418 
2420 
2430 
2448 
2450 
2468 


2478 
2480 
2498 
2586 
2516 
2520 
25308 
2546 
2558 
2568 
2570 
2588 
2590 
2680 
2618 
26208 
2630 
2648 
2658 


CLS:undraw=O:PRINT cmnd$(ro);:LOCATE 1,3:PRINT"<Le 
ertaste> ";:IF ro=3 OR ro=4 THEN PRINT"fuer Menu" 
RETURN 

CLS: flag=-1 

FOR i=1 TO LEN(cmnds$(menu) ) 

ps=it+ABS (menu=2)*LEN(cmnds$(1)) 

PEN 1:PRINT"<"MID$(cmnds$(menu),i1,1)">"MID$(€comman 
d$(ps),2,4)" "; 

NEXT 

PRINT"<CLR> <DEL> <SPACE>"; 

RETURN 

' Ss 

GOSUB 2460:IF filename$S=""" THEN 2376 

GOSUB 2558 

SAVE filename$,b,&C608,&4008 

GOSUB 22686 

RETURN 

' R 

GOSUB 2460:IF filename$="" THEN 2446 

GOSUB 2736 

LOAD filename$,&CO0B8 

GOSUB 2576 

GOSUB 2260 

RETURN 

CLS:LOCATE 18,3:PRINT"<RETURN> um Funktion abzubre 
chen!"; 

LOCATE 1,1:PRINT"Dateinamen eingeben :"; 

INPUT "",filenameS:IF filename$=""" THEN RETURN 
n=INSTR(filename$,"."):I1F n=@ THEN 2520 

IF n=1 THEN 2468 

filenameS=LEFTS(filename$,n-1) 
filename$=LEFT$(filename$,8)+".scn" 


CLS 

RETURN 

FOR i=@ TO 4:POKE &CO8O+i,pn(i) : NEXT 

RETURN 

FOR i1=@ TO 4:pn(i)=PEEK(&CBGB+i) MOD 27:NEXT 


cn=O:FOR i=@ TO 2:I1F pn (id=pn(it+1) THEN cn=cn+1 
NEXT: IF cn=3 THEN 2638 

FOR i=@ TO 3:INK i,pn(€i):NEXT 

BORDER pn(4):pn=1:GRAPHICS PEN pn 

RETURN 
pn(@)=@8:pn(1)=26:pn(2)=15:pn(3)=6:pn (4) =8 

GOTO 2688 

"1, 2, 3, & 4 
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2668 CLS:PRINT"Wollen Sie das Bild <S>peichern":PRINT T 
AB(16)"<H>ervorholen":PRINT TAB(13)"oder <T>ausche 
n?"' 

2670 ser$="SHT"+CHR$(13):GOSUB 2230:IF i$=CHRS(13) THEN 
2260 

2688 bnk2=(cmnd-13):bnk1=1 

2698 IF i$="S" THEN CLS:GOSUB 255@:ISCREENCOPY,bnk2,bnk 


1 
2700 IF i$="H" THEN GOSUB 2730: I1SCREENCOPY,bnk1,bnk2:60 
SUB 2576 


2718 IF i$="T" THEN CLS:GOSUB 2738:GOSUB 2558: ISCREENSW 
AP,bnk2,bnk1:GOSUB 2578 

2728 GOSUB 2268:RETURN 

2730 FOR i=@ TO 3:INK i1,8:NEXT: BORDER O:RETURN 

2748 CLS:GOSUB 2600:RESUME 2268 

2758 DATA "CBFTQLIANEXM","1234RSM" 

2768 DATA 19,Circle,"Box ","Fill ",Triangle,Alternate, 
"Line ","Inks ",ASCII,Normal,Erase,"Xor ","Menu 
Pa | Mee ste wgeed eo & ",Restore,"Save "," 
Menu " 

2778 DATA Circle,Box,Edge colour,Filler colour,Triangle 

1,Triangle 2,Line,** 


Die beiden RSX-Befehle ISCREENCOPY und ISCREENSWAP in diesem 
Programm stellt das ‘Bank Manager’-Dienstprogramm auf Seite 1 Ihrer 
System-Disketten zur Verfiigung. Diese Befehle erleichtern das Kopieren und 
Austauschen verschiedener Bildschirminhalte zwischen den zugehérigen 
Speicherblécken und zwischen den beiden 64K-Banken des Speichers. 


Bevor Sie das obige Programm laufen lassen, miissen Sie deshalb das ‘Bank 
Manager’-Programm von Seite | einlegen und: 


run "bankman" 


..eintippen. Danach konnen Sie das Bildentwurfsprogramm laufen lassen. 


Was passiert danach? 


Nachdem Sie das Bank Manager-Programm und das Bildentwurfsprogramm haben 
ablaufen lassen, erscheint auf dem Bildschirm ein Meni mit einem blinkenden 
Graphik-Cursor in der Mitte des Bildschirms. 
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Sie brauchen nur den Anfangsbuchstaben der gewiinschten Option zu driicken 
(z.B. C fir Circle), damit das zugehorige Programm ausgefiihrt wird. Tippen Sie 
zur Demonstration: 


C 


Drticken Sie die Cursor-oben Taste, bis der Cursor ungefahr drei Zentimeter 
oberhalb der Bildschirmmitte liegt. 


Drticken Sie dann die Leertaste, um die Kreis-Funktion auszufiihren. 
AnschlieBend kommen Sie wieder ins Meni. 


Wenn Sie M (fiir Menu) driicken, kommen Sie zum alternativen Ment, mit dem 
Sie Bildschirmabdriicke auf Diskette speichern (S) oder abrufen (R) kénnen; 
auBerdem haben Sie die Méglichkeit, die Inhalte des 1., 2., 3. oder 4. Bildschirms, 
die sich alle in der zweiten 64K-Bank befinden, zu ‘verschieben’. 


Wenn Sie solche ‘Verschiebungen’ vornehmen miéchten, tippen Sie die 
Speicher-Nr. (1, 2, 3 oder 4) und sehen nun ein weiteres Meni: 


S (Store) Legt einen Bildschirmabdruck im Speicher ab 
R (Retrieve) Ruft einen Bildschirmabdruck aus dem Speicher 
E (Exchange) Tauscht Bildschirmabdriicke aus 


[RETURN] Bricht die Operation ab 


Mochten Sie beispielsweise das Bild, das Sie gerade auf dem Bildschirm haben, 
im Speicher Nr. 2 ablegen, tippen Sie 2 und dann S ein. 


Nach Ausfithrung der S-, R- oder E-Funktion kehren Sie zum alternativen Menti 
zurtick. Wenn Sie jetzt M driicken, sind Sie wieder im urspriinglichen Meni. 


Unser Beispielprogramm bietet eine Vielzahl von Méglichkeiten: Es zeichnet 
Kasten, Kreise, Dreiecke, Linien, Punkte, es kann Formen farblich ausfiillen und 
Symbole zeichnen. 


Ist ein Bild fertig, kénnen Sie es zur spateren Verwendung auf Diskette 
speichern, indem Sie S aus dem alternativen Meni auswahlen, und mit R aus 
demselben Meniti kénnen Sie es wieder auf den Bildschirm holen. 


Damit ist nun das letzte Kapitel dieses Handbuches 
abgeschlossen. Wenn Sie unsere zahlreichen 
Beispielprogramme analysiert und ausprobiert haben, sollten 
Sie den Umgang mit dem Schneider-BASIC und dem CPC6128 
mittlerweile recht gut beherrschen. 
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Weitergehende Informationen 


Aus vielen anderen Publikationen von Schneider und 
unabhangigen Autoren erfahren Sie weitere Einzelheiten tiber 
den 6128, sowie tiber BASIC, die Firmware, das 
CP/M-Betriebssystem und die Computer-Sprache Dr.LOGO. 


Am Schlu8 dieses Buches finden Sie noch einen vierteiligen 
Anhang ~~ mit dem CP/M-Benutzer-Lizenzabkommen, 
Begriffserklarungen, einigen Spiel-Programmen und einem 
Index ftir dieses Handbuch. 


Wir hoffen, daB dieses Handbuch fiir Sie eine interessante und 
informative Lekttire war und danken Ihnen fiir den Kauf des 
CPC6128. 
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Anharg I 
Endabnehmer-Lizenzabkommen 
mit Digital Research und Schneider 


Hinweis far den Anwender: 


Lesen Sie bitte diesen Abschnitt sorgfaltig durch, bevor Sie das 
Disketten-Paket 6ffnen. 


Durch das Offnen des Disketten-Pakets zeigen Sie sich mit dem Inhalt des 
Endabnehmer-Lizenzabkommens und den darin genannten Bedingungen 
einverstanden. 


1. Definitionen 


1.1 DRI steht far DIGITAL RESEARCH (CALIFORNIA) INC., P.O. Box 579, 
Pacific Grove, California 93950, dem Inhaber des Copyright fir das 
Programm. 


1.2 Maschine steht fiir den einen Mikrocomputer, auf dem Sie das Programm 
betreiben. Weitere CPU-Systeme erfordern zusatzliche Lizenzen. 


1.3 Programm steht fiir den Programm-Satz, die Dokumentation und 
zusatzliches Material in diesem Paket, sowie erganzende Nachtrage und 
Zusatze, die von DRI geliefert werden, ungeachtet spezieller Verwendungen 
und Modifikationen Ihrerseits. 


1.4 Schneider steht fiir SCHNEIDER COMPUTER DIVISION, Silvastr. 1, 8939 
Turkheim. 


Die Verantwortung fir die Programm-Auswahl, ihre Verwendung, sowie die 
Installation liegt beim Kaufer. 


2. Lizenz 


Sie durfen: 


2.1 das Programm nur auf einer einzigen (dieser) Maschine betreiben. 
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2.2 das Programm auf dieser Maschine far Reservekopien oder Anderungen in 
beliebige maschinenlesbare oder gedruckte Form ubertragen, wenn es Ihren 
personlichen Zwecken dient. Die Anfertigung von bis zu drei 
Programm-Kopien ist erlaubt. Einige Programme verbieten oder 
beschranken die Anfertigung von Kopien. Sie sind durch den Hinweis “copy 
protected” gekennzeichnet. Das Kopieren und Vervielfaltigen der 
Dokumentation und des zugehérigen gedruckten Materials ist verboten. Das 
Disassemblieren des Programm-Codes ist verboten. 


2.3 das Programm auf dieser Maschine verdndern und/oder es in andere 
Programme einfiigen, sofern es ihrer persénlichen Verwendung dient. Jeder 
in ein anderes Programm integrierte Programmteil unterliegt ebenfalls 
diesen Lizenzbestimmungen. 


2.4 das Programm und die Lizenz an eine dritte Person tibertragen, sofern Sie 
den Namen und die Adresse an DRI melden und die dritte Person: 


a) den Inhalt und die Bedingungen dieses Lizenzabkommens akzeptiert 
b) eine Kopie der Registrierkarte unterschreibt und an DRI sendet 


c) die Lizenzgebihr entrichtet 


Wenn Sie das Programm tbertragen, miissen Sie entweder gleichzeitig alle 
Kopien, einschlieflich Original, in gedruckter oder maschinenlesbarer Form mit 
tibergeben, oder alle nicht ttbergebenen Kopien vernichten. Dies gilt auch fir 
samtliche modifizierten Programme und Programmteile, die in andere 
Programme integriert wurden. 


Der Text des Copyright mu8 auf jeder Kopie, sowie auf jedem veradnderten 
Programm und auf jedem Programmteil stehen, der in andere Programme 
integriert wurde. 


JEDE DISKETTE TRAGT EINE SERIENNUMMER. DAS PROGRAMM, 
EINE KOPIE, EINE MODIFIKATION UND JEDER PROGRAMMTEIL, 
DER IN EIN ANDERES PROGRAMM INTEGRIERT WURDE, DARF, 
SOFERN IM  LIZENZABKOMMEN NICHT AUSDRUCKLICH 
GENEHMIGT, WEDER GANZ NOCH TEILWEISE EINER DRITTEN 


PERSON ZUGANGLICH GEMACHT WERDEN. 


BEI ZUWIDERHANDLUNGEN ERLOSCHEN ALLE RECHTE AUS 
DIESEM LIZENZABKOMMEN. 
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3. Auflosung 


Diese Lizenz ist bis zu ihrer Auflésung giltig. Sie konnen die Lizenziibereinkunft 
vorzeitig auflésen, indem Sie das Programm zusammen mit allen Kopien, 
Modifikationen und Programmteilen vernichten. Die Lizenzrechte erléschen 
ebenfalls unter bestimmten, in diesem Abkommen dargelegten Bedingungen, und 
bei Verletzung des Abkommens. Sie erklaren sich hiermit einverstanden, bei 
Beendigung des Abkommens das Programm mit allen Kopien, Modifikationen 
und Programmteilen zu vernichten. 


4. Eingeschrankte Garantie 


SCHNEIDER UND DRI UBERNEHMEN KEINERLEI GARANTIE FUR 
DIE EIGNUNG DES PROGRAMMS FUR BESTIMMTE ANWENDUNGEN. 
DAS RISIKO BEZUGLICH QUALITAT UND LEISTUNGSFAHIGKEIT 


LIEGT BEIM KAUFER. SOLLTE DAS PROGRAMM DEFEKT SEIN, 
TRAGT DER KAUFER DIE NOTWENDIGEN KOSTEN FUR 
REPARATUR UND SERVICE. 


Weder Schneider noch DRI tibernehmen die Garantie dafir, da die im 
Programm enthaltenen Funktionen den Anforderungen des Benutzers geniigen 
bzw. fehlerfrei sind. 


Schneider gibt jedoch die Gewahr, dafi sich die Diskette mit dem Programm in 
einwandfreiem Zustand hinsichtlich Material und Verarbeitung befindet. Die 
Garantiezeit fiir diese Eigenschaften betragt 90 Tage ab Lieferdatum. 


5. Haftung 


Schneider verpflichtet sich lediglich, Disketten, die der eingeschrankten Garantie 
nicht geniigen, zu ersetzen. 


DRI UND SCHNEIDER HAFTEN NICHT FUR SCHADEN, DIE IN 
IRGENDEINER FORM BEI DER BENUTZUNG DIESES PRODUKTS 
ENTSTEHEN. 
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6. Registrierkarten 


Die Programme werden von Zeit zu Zeit von DRI idberarbeitet. Diese 
lberarbeiteten Versionen werden nur an Kunden ausgeliefert, deren 
unterzeichnete Registrierkarte bei DRI oder einem authorisierten Handler 
vorliegt. DRI ist jedoch nicht verpflichtet, die Programme zu tiberarbeiten oder 
uberarbeitete Versionen zu liefern. 


7. Allgemeines 


Das Programm darf nur im Rahmen dieses Abkommens lizenziert, tibereignet 
oder ubertragen werden. Jeder Versuch, diese Rechte auf andere Weise zu 
lizenzieren oder zu tibertragen, zieht keine Verpflichtungen des Herstellers nach 
sich. 


Fragen, die sich aus diesem Lizenzabkommen ergeben, kénnen direkt an: 


Digital Research 

P.O. Box 579 

Pacific GroveCalifornia 93950 
USA 


..gerichtet werden. 


DIESES LIZENZABKOMMEN DARF NICHT IN KAUFVERTRAGEN, 
WERBEANGEBOTEN ODER ANDEREN WIEDERGABEN MODIFIZIERT 
WERDEN, SONDERN NUR DURCH EINEN SCHRIFTLICHEN VERTRAG 
MIT EINEM AUTHORISIERTEN HANDLER ODER SCHNEIDER 


DER KAUFER BESTATIGT DURCH DEN ERWERB DIESES PRODUKTS 


SEIN EINVERSTANDNIS MIT DEN BEDINGUNGEN UND 
VERPFLICHTUNGEN DIESES ABKOMMENS. ER BESTATIGT FERNER, 
DASS ES ZWISCHEN IHM UND DRI SOWIE SCHNEIDER KEINE 
ZUSATZLICHEN SCHRIFTLICHEN ODER MUNDLICHEN 
ABSPRACHEN GIBT. 
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Anhang 2 
Fachworterverzeichnis 


Einige haufig vorkommende Begriffe in der Datenverarbeitung 
werden hier fir den Benutzer des CPC6128 erklart. 


Abenteuerspiel (Adventure Game) 


Fiir einige das Hochste, fir andere schlicht langweilig. Ein Computerspiel mit 
viel Text, bei dem der Spieler eingeladen ist, Abenteuer zu bestehen, um aus 
einem Irrgarten oder Labyrinth herauszufinden. 


Abschneiden (Truncate) 


Eine Zahl oder ein Text werden gekiirzt, indem die ersten oder letzten Zeichen 
entfernt werden. Dieser Vorgang kann absichtlich herbeigefihrt werden, um z.B. 
eine Zahl zu runden. Eine Zahl oder ein Text kénnen auch unbeabsichtigt 
abgeschnitten werden, wenn nicht genug Platz fir sie vorhanden ist. Der 
abgeschnittene Teil geht verloren. 


Adresse 


Die Zahl in einer Anweisung, die die Lage einer ‘Zelle’ im Computerspeicher 
angibt. Uber die Adresse kann eine bestimmte Speicherstelle gefunden und ihr 
Inhalt ‘gelesen’ werden. Handelt es sich um ein RAM, kann auch etwas an eine 
Adresse ‘geschrieben’ werden. 


Akkumulator (Accumulator) 


Eine Speicherstelle im Schaltkreis des Mikroprozessors im Herzen des 
Mikrocomputers, in der Daten wahrend ihrer Verarbeitung voritbergehend 
zwischengespeichert werden. Beim Programmieren in Maschinen-Code ist er 
standig in Benutzung - fur BASIC-Anwender ist er ohne Belang. 


Akustikkoppler (Acoustic coupler) 


Auch bekannt als akustisches Modem. Eine elektronische Zusatzeinrichtung, die 
einen Telefonhérer mit einem Computer verbindet, und diesen damit an das 
normale Telefonnetz anschlieBt. Auf diese Weise kann ein Computer mit 
offentlichen Informationssystemen wie z.B. Btx verkehren, oder mit anderen 
Benutzern von Heimcomputern, um Software, Daten oder Informationen 
auszutauschen. 
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Algorithmus (Algorithm) 
Ein groRartig klingender Name fir eine komplizierte Formel oder 


Rechenaufgabe. Eine Folge logischer und arithmetischer Schritte, um eine genau 
definierte Aufgabe mit dem Computer zu erledigen. 


Alphanumerisch 


Bezeichnet Buchstaben und Zahlen im Gegensatz zu graphischen Symbolen. 


ALU 
Arithmetic Logic Unit (arithmetisch-logische LEinheit). Der Teil des 


Mikroprozessors, der die arithmetischen und logischen Operationen ausfihrt. Ist 
nur beim Programmieren in Maschinen-Code von Bedeutung. 


AMSDOS 


Abkiirzung fir AMStrad Disc Operating System. Dieses Programm erméglicht 
BASIC den Zugriff auf Disketten. 


Analog 


Charakterisiert den Ubergang zwischen einem Anfangs- und Endzustand als 
allmahlich oder stufenweise und nicht abrupt. Computer arbeiten im Gegensatz 
dazu digital, so daB die in der natiirlichen Welt meist analog vorkommenden 
Vorgange erst in digitale Einheiten umgeformt werden misssen, bevor ein 
Computer etwas damit anfangen kann. 


Animation 


Zeichentrickfilme sind die bekannteste Art von Animation. Bei der 
Computer-Animation werden graphische Darstellungen variiert, so da8 der 
Eindruck von ‘echter’ Bewegung entsteht. 


Anweisung (Statement) 


Ein Befehl oder eine Folge von Befehlen in einem Programm. 
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Anwender-Programm (Applications programm) 
Ein Programm zur Bearbeitung eines bestimmten Anwendungsproblems (z.B. 


Buchhaltung) im Gegensatz zu Systemprogrammen, die die Arbeit des Computers 
steuern. 


Architektur (Architecture) 
Allgemeiner Aufbau und interne Beziehung zwischen Datenbus, peripheren 


Gerdten und CPU eines Mikrocomputers. Kein Thema fir Leser dieser 
Begriffserklarungen - noch nicht! 


Argument 


Eine unabhangige Variable. In dem Ausdruck xty=z z.B. sind x, y und z 
Argumente. 


Array 


Eine zweidimensionale Matrix (Gitter), in der Daten gespeichert und mit 
waagrechten und senkrechten Koordinaten adressiert werden. 


ASCII 
Steht fiir ‘American Standard Code for Information Interchange’. Genormter Code 


fiir die Darstellung von Zahlen, Buchstaben und Symbolen, die tiber die Tastatur 
eingegeben oder durch eine Vielzahl anderer Befehle hervorgerufen werden. 


Assembler 


Eine maschinenorientierte Programmiersprache, bei der fir Maschinen- 
Code-Anweisungen eine symbolische (mnemotechnische) Schreibweise verwendet 
wird. 


Auffrischen (Refresh) 


Das Aktualisieren von Daten auf dem Bildschirm oder im Speicher. Die schon 
vorhandenen Daten werden dabei nicht unbedingt vernichtet, sondern 
moglicherweise nur auf den neuesten Stand gebracht. 
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Auflosung (Resolution) 


Die Moéglichkeit festzustellen, wo ein Element einer Bildschirm-Darstellung 
endet, und wo das nachste beginnt. Manchmal auch fiir die Fahigkeit des 
Computers, Berechnungen mit sehr grofen Zahlen durchzufihren. 


Ausdruck (Expression) 


Eine einfache oder komplizierte Formel in einem Programm zur Berechnung von 
Daten. Der Ausdruck beschreibt meist die Art von Daten, die bearbeitet werden 
kann. In der LOGO-Sprache besteht ein Ausdruck aus einem Prozedurnamen, 
gefolgt von den erforderlichen Eingabe-Elementen fur die Prozedur. 


Ausgabe (Output) 


Alles was der Computer aufgrund seiner Funktionen ausgibt. 


Austesten (Debugging) 


Fehlersuche im Programm durch eine Kombination aus Versuchen und 
wissenschaftlichen Methoden. 


Automatenspiel (Arcade Game) 


Computerspiel mit viel ‘Action’, in denen z.B. Eindringlinge aus dem Weltall 
angreifen oder unersattliche Monster durch Labyrinthe jagen und unachtsame 
Opfer auffressen. Der Spieler mu8 seine Figuren so steuern, da sie ihrem 
unangenehmen Schicksal entgehen. Diese Spiele machen Spa8 und trainieren die 
Reflexe, bieten aber nur wenig fiir den, der sich ernsthaft mit dem Computer 
beschaftigt. 


Backup 


Reservekopie, die bei Verlust oder Beschadigung des Originals die Informationen 
rettet. Sie wird durch Duplizieren einer Diskette oder Disketten-Datei erzeugt. 


BASIC 


Beginners’ All-purpose Symbolic Instruction Code. Eine interpretative 
Programmiersprache, mit der fast alle Heimcomputer betrieben werden. BASIC 
ist leicht zu erlernen und einfach zu benutzen, da Programme wahrend ihrer 
Entwicklung zusammengestiickelt und getestet werden kénnen und nicht wie bei 
Compilersprachen erst das gesamte Programm fertig sein mu}, bevor man es 
starten kann. 
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Basis (Base) 


Grundzahl eines Zahlensystems. Das Binarsystem hat die Basis 2, das 
Dezimalsystem die Basis 10 und das Hexadezimalsystem die Basis 16. 


Baud 


Ein Bit pro Sekunde. MaB8einheit fir die Geschwindigkeit bei der 
Datentibertragung. 


BCD 


Binary Coded Decimal. Ein System zur Codierung von Dezimalzahlen, in dem 
jede Zahl mit vier Binarziffern dargestellt wird. 


BDOS 


Basic Dise Operating System. Bestandteil des CP/M-Betriebssystems, der eine 
Anwender-Schnittstelle zum Aufruf der CP/M-Funktionen bereitstellt. 


Befehl (Instruction) 


Aufforderung oder Kommando an den Computer, eine bestimmte Operation 
auszufiihren. Eine Folge von Befehlen bildet ein Programm. 


Die primaren logischen und mathematischen Prozesse, die ein Mikroprozessor 
ausfiihrt. Jeder Befehl einer hodheren Programmiersprache (auch 
Assembler-Befehle) mu8 in einzelne Befehle aufgegliedert werden, die von einer 
Computer-CPU verstanden werden kénnen. Ein einziges Kommando kann viele 
Befehle der CPU auslésen. 


Bemerkung (Remark) 


Eine nicht ausfiihrbare Programmanweisung (REM) im Programm, um zu 
dokumentieren, was an dieser Stelle getan wird, oder auch zur Kennzeichnung 
des Programmentwicklungsstandes. 


Benutzerdefinierte Taste (User defined key - UDK) 


Der CPC6128 hat 32 Tasten, die umdefiniert werden kénnen, um verschiedene 
Aufgaben zu erfillen. 
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Betriebssystem (Operating system) 


Software, welche die Verwaltung des Speichers und die Koordinierung der 
Aktionen des Computers steuert. 


Bildschirmeditor (Screen editor) 


Ein Aufbereitungsprogramm fiir Texte und Programme, bei dem der Cursor an 
jede Stelle des Bildschirms positioniert werden kann, um die dort stehenden 
Zeichen zu andern. 


Binarsystem (Binary) 


(Siehe Basis) Auch Dualsystem genannt. Das Zahlensystem zur Basis 2, in dem 
alle Zahlen nur mit den beiden Ziffern 0 und 1 dargestellt werden. 


Binarzahl (Binary number) 


Eine in binadrer Schreibweise dargestellte Zahl. Bei der Programmierung des 
CPC6128 werden sie mit einem vorangestellten &X gekennzeichnet (z.B. bedeutet 
&X0101 in dezimaler Schreibweise 5). 


BIOS 


Steht fiir ‘Basic Input/Output System’. Dies ist der hardware-abhangige 
Bestandteil von CP/M, der fiir einen speziellen Computertyp entwickelt wurde. 
Alle Ein- und Ausgabefunktionen, die iber Bildschirm, Tastatur, Diskette usw. 
laufen, werden durch BIOS bearbeitet. 


Bit 


Kurzform fiir Binary digit (Binarziffer). Eine Ziffer im binaren Zahlensystem 
kann nur den Wert 0 oder 1 annehmen. 


Bitsignifikant (Bit significant) 


Ergibt sich aus dem Zustand (0 oder 1) jeder Binarstelle in einem Byte eine 
Information, so nennt man diese Binarzahl bitsignifikant. 


Anhang 2 Seite 6 Fachworterverzeichnis 


Boolesche Algebra (Boolean algebra) 


Logische Verknipfung, bei der nur zwei Antworten mdglich sind: wahr und 
falsch, normalerweise mit 1 bzw. 0 dargestellt. 


Booten 


Laden eines Betriebssystems in den Speicher. Beim CP/M-Start unter BASIC 
wird automatisch ein kleines ‘Boot-Programm’ (siehe Urlader) von der Diskette 
geladen, das dann den Rest des Betriebssystems in den Speicher ladt. 


Built-in commands 


Befehle, die Bestandteil eines Betriebssystems sind. Sie werden schneller als 
transiente Befehle abgearbeitet, da sie nicht von Diskette geladen werden 
mussen. 


Bus 


Eine Gruppe von Verbindungen entweder im Computer selbst oder als 
Verbindung zu Peripheriegeraten. Sie wtbertragen Informationen Uber den 
Zustand der CPU, des RAM oder andere Hardwareeigenschaften. Der 
CPC6128-Bus befindet sich in der Platine der EXPANSION-Buchse an der 
Ruckseite des Computers. 


Byte 


Eine Gruppe von acht Bits, welche die kleinste adressierbare Einheit im Speicher 
darstellt. 


CAD 


Computer Aided Design (Computer-unterstitzter Entwurf). Normalerweise ein 
Zusammenspiel von Rechenleistung und Computergraphik als elektronisches 
ReiBbrett, obwohl jede Art von Berechnung, die der Computer fiir einen ‘Entwurf 
durchfthrt, als CAD gelten kann. 


CAE 


Computer Aided Education (Computer-unterstiitzte Schulbildung). Noch eine 
Abkiirzung aus der Computer-Welt. Hiermit ist alles gemeint, was mit 
Computern im Schulunterricht zu tun hat. Darunter fallen CAI (Computer Aided 
Instruction) und CAE (Computer Aided Education). 
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CCP 
Abktrzung fir ‘Console Command Processor’. Dieses CP/M-Modul interpretiert 


und bearbeitet die tiber die Tastatur erfolgten Anwender-Kingaben. In der Regel 
sind diese Eingaben Befehle, die durch CCP geladen und ausgefiihrt werden. 


Chip 
Kin irrefiihrender, umgangssprachlicher Begriff fiir eine integrierte Schaltung. 


Der Chip ist in Wirklichkeit ein Plattchen aus speziell hergestelltem Silizium, 
auf der die Schaltung untergebracht ist. 


Code 


Auger in seiner normalen Bedeutung wird dieses Wort von Programmierern oft 
als Kurzform fiir ‘Maschinencode’ benutzt. 


Compiler 
Kin komplexes Programm, das ganze, in einer héheren Programmiersprache wie 
BASIC geschriebene Programme in den direkten Befehlscode des Mikroprozessors 


umwandelt. Dadurch wird eine sehr viel schnellere Durchfiihrung der 
Operationen erreicht. 


Computer der fiinften Generation (Fifth generation computers) 


Meist sehr grofe Computer, die durch sogenannte kiinstliche Intelligenz selbst 
programmieren kénnen. 


Computergenerationen 
Klassifizierung der grofen technischen Meilensteine in der Computerentwick- 


lung. Die sich daraus ergebenden Gruppierungen werden als Generationen 
bezeichnet. 


CP/M 


Steuerprogramm fiir Mikrocomputer. Ein Diskettenbetriebssystem von Digital 
Research mit einem Standard-System-Interface fiir Software, die fiir einen 
GroBteil der Mikrocomputersysteme geschrieben wurde. 


Anhang 2 Seite 8 Fachworterverzeichnis 


CPU 
Central Processing Unit (Zentrale Prozessoreinheit). Das Herz jedes 


Computersystems, in dem Anweisungen interpretiert und deren Ausfiihrung 
ausgelést werden. In einem Mikrocomputer ist die CPU der Mikroprozessor selbst. 


Cursor 


Ein beweglicher Zeiger, der anzeigt, wo das nachste Zeichen auf dem Bildschirm 
erscheint. 


Cursor-Tasten (Cursor control keys) 
Tasten, auf denen Pfeile abgebildet sind. Mit ihnen 14f%t sich der Cursor auf dem 


Bildschirm umherbewegen. Sie werden auch haufig zum Steuern von 
Bewegungen in Automatenspielen benutzt. 


Datei (File) 


Eine Datensammlung, die meistens auf Kassette oder Diskette gespeichert ist. 


Dateiname (Filename) 
Name einer Datei. Bei Dr.LOGO besteht ein Dateiname aus bis zu acht 
alphabetischen oder numerischen Zeichen. Unter CP/M sind drei zusatzliche 


Zeichen fiir den Dateityp zugelassen, die durch einen Punkt vom ersten 
Namensteil getrennt werden. 


Datenbasis (Data base) 


Ein Bereich mit verschiedenen Datenarten in mehreren adressierbaren 
Formaten. 


Datenerfassung (Data capture) 


Vorgang, bei dem Daten von externen Gerdten aufgenommen werden, die in 
irgendeiner Weise mit dem zentralen Computer verbunden sind. 


Datensatz (record) 


Eine Gruppe von Bytes in einer Datei. CP/M verwendet Datensatze zu 128 Byte. 
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Datenubertragung (Download) 


Die Ubertragung von Information von einem Computer zum anderen, wobei der 
Empfanger als ‘downloading’ bezeichnet wird. Der sendende Computer ist 
‘uploading’. 


Dezimalsystem (Decimal system) 


Zahlensystem mit der Basis 10. Mit den Ziffern von 0 bis 9 werden Einer-, 
Zehner-, Hunderter-, Tausender-Stellen usw. dargestellt. 


Diagnose (Diagnostic) 


Meldung, die der Computer automatisch ausgibt, um einen Fehler im Programm 
anzuzeigen. 


Dienstprogramm (Utility program) 


Programm auf Diskette, mit deren Hilfe der Anwender bestimmte Aufgaben 
bewaltigen kann. (Siehe transiente Programme) 


Digital 


Beschreibt den Wechsel von einem Zustand zu einem anderen als abrupt, ohne 
Ubergang. Gegenteil von analog. 


Digitalisierer (digitiser) 


Gerat, das analoge Information in das digitale Aquivalent umwandelt. Wird oft 
im Zusammenhang mit Graphik-Tabletts verwendet. 


Diskette (Floppy disc, Disk) 


Eine dunne Plastikscheibe, die auf einer oder beiden Seiten mit einer 
Magnetschicht versehen ist. Sie dient zur Speicherung von Daten. Die Scheibe 
befindet sich in einem Schutzgehduse mit einem Fenster fiir das Lesegerat. Bei 3 
Zoll-Disketten wird das Fenster automatisch mit einer Metallplatte verschlossen, 
wenn die Diskette aus dem Laufwerk genommen wird. 
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Diskettenlaufwerk (Disc drive) 


Geradt, das die Diskette antreibt, und Informationen auf die magnetisierbare 
Oberflache der sich drehenden Diskette schreibt, sowie dort gespeicherte 
Informationen wieder liest. 


Dokumentation (Documentation) 


Handbicher fiir die Benutzung von Computern oder Software. 


Doppelseitig (Double sided) 


Bezeichnet eine Diskette, die auf beiden Seiten Informationen speichern kann. 
Zwei-Kopf-Laufwerke kénnen auf beide Seiten der Diskette zugreifen, ohne da} 
sie gewendet werden mul. 


DOS 


Abkirzung fiir ‘Disc Operating System’ (Disketten-Betriebssystem). Software, die 
alle Operationen im Zusammenhang mit dem Diskettenlaufwerk steuert. 


Dr.LOGO 


LOGO-Version von Digital Research. LOGO ist eine Programmiersprache mit 
Graphik-Schildkrote. 


Drucker (Printer) 

Gerat, um Texte oder Graphiken auf Papier auszudrucken. 
E/A (I/O) 

Kingabe/Ausgabe (Input/Output) 


Echtzeit (Real time) 


Ereignisse, die sich vor Ihren Augen abspielen, im Gegensatz zu jenen, die erst 
nach Ablauf eines Prozesses, der sie bewirkt hat, zutage treten. 
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Editieren (Edit) 


Das Korrigieren oder Andern von Daten, Programmen oder Texten. 


Editor 


Ein Programm, das sich normalerweise im ROM befindet und das Editieren 
ermoglicht. 


Eingabe (Input) 


Alles, was in den Computerspeicher gelangt, tiber die Tastatur, das 
Diskettenlaufwerk, die serielle Schnittstelle oder eine andere Quelle. 


Einseitig (Single sided) 


Bezieht sich auf eine Diskette, die nur auf einer Seite Daten speichern kann. 


EPROM 


Erasable, Programmable Read only Memory. Lésch- und programmierbarer 
Speicher, der nur gelesen werden kann. Ahnlich dem PROM, nur sind die Daten 
darauf mit ultraviolettem Licht léschbar, so da8 neue Programme darauf 
gespeichert werden kénnen. Ein EEPROM ist dhnlich, wird aber elektronisch 
geléscht. 


Fehler (Bug) 


Die Fehlerskala reicht vom unerwarteten Programmablauf durch falsche 
Anwendung eines Programms (z.B. andert sich die Bildschirmfarbe, wenn 
gleichzeitig vier Tasten gedrtickt werden), bis hin zur Fehlerkette, die ein 
Programm vollstandig und unwiderruflich abstiirzen 1a%t und samtliche Daten im 
Speicher léscht. 


Festkommazahl (Fixed-point number) 


Kine Zahl, deren Dezimalpunkt an einer fest definierten Position steht. 
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Firmware 


Software im ROM - ein Zwischending zwischen reiner Software und reiner 
Hardware. 


FluBdiagramm (Flow chart) 


Eine Darstellung von Programmablauf und logischen Prozessen, womit die 
Reihenfolge der einzelnen Schritte bei der Ausfiuhrung des Programms verfolgt 
werden kann. 


Forth 
Eine sehr schnelle Programmiersprache, deren Geschwindigkeit und Komplexitat 


zwischen héherer Programmiersprache und Maschinen-Code liegt. Fir Anfanger 
nicht geeignet. 


Funktionstaste (Function key) 


Eine Taste der Tastatur, der eine besondere Funktion zugeordnet wurde, welche 
sie zusatzlich oder an Stelle der eigentlich vorgesehenen, auf der Taste 
dargestellten Funktion austbt. 


Ganzzahl (Integer number) 


Eine Zahl ohne Bruchteil, dh. ohne Ziffern rechts vom Dezimalpunkt, im 
Gegensatz zur reellen Zahl. 


Gatter (Gate) 


Logische Gatter erlauben die Durchlaf von Daten, wenn bestimmte Bedingungen 
erfillt sind. Es gibt verschiedene Arten von Gattern, z.B. OR, AND und XOR 
(siehe Boolesche Algebra). 


Gerausch (Noise) 


Der Tongenerator des CPC6128 ermdglicht die Erzeugung von Gerauscheffekten, 
z.B. Explosionen. 
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Gleitkommazahl (Floating point number) 
Reelle Zahl, deren Dezimalpunkt beim Speichern und Bearbeiten verschoben 


werden kann. Dieses Vorgehen empfiehlt sich besonders beim Umgang mit sehr 
grofen Zahlen. 


Graphik (Graphics) 
Teil der Bildschirmdarstellung auf dem Computer, der nichts mit der Darstellung 


von Text zu tun hat. Graphik bedeutet das Zeichnen und Plotten von Linien, 
Kreisen, Mustern usw. 


Graphikcursor (Graphics cursor) 
Ahnlich dem Textcursor, jedoch fiir den Graphikbildschirm. Beim CPC6128 ist er 
zwar unsichtbar, aber zum Positionieren von Graphiken unerlaflich. Nicht mit 


graphischen Symbolen verwechseln, die Teil des Zeichensatzes sind und an der 
Stelle ausgegeben werden, wo sich der Textcursor befindet. 


Graphikmodus (Graphics mode) 


Friihere Mikrocomputer muften in den jeweiligen Modus zur Verarbeitung von 
entweder Text oder Graphik umgeschaltet werden. Moderne Personal-Computer 
konnen gleichzeitig mit Text und Graphik arbeiten. 


Graphik-Tablett (Graphics tablet) 


Ein Gerat, das die Koordinatenpunkte eines Bildes oder einer Zeichnung zur 
Verarbeitung an den Computer weitergibt. Eine Art Analog/Digitalwandler. 


Graphisches Symbol (Graphics character) 


Besonderes Zeichen oder Muster, das fiir die Erstellung von Bildern sehr nutzlich 
ist. 


Halbbyte (Nibble) 


Aus vier Bits bestehender Ausdruck. Jede Ziffer im hexadezimalen Ausdruck &F6 
stellt ein Halbbyte dar. 
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Hard copy 


Papierausdruck von einem Programm oder Text, oder von einer graphischen 
Darstellung. Der voriibergehende Ausdruck auf dem Bildschirm heiSt Softcopy. 


Hardware 


Die elektronischen und mechanischen Teile eines Computersystems, alles was 
nicht unter Software oder Firmware fallt. 


Hexadezimalsystem (Hexadecimal system) 


Zahlensystem zur Basis 16. In Programmen fir den 6128 werden 
Hexadezimalzahlen durch ein vorgestelltes & oder H gekennzeichnet, z.B. &FF = 
(dezimal) 255 (siehe Teil 1 des 9. Kapitels). 


Hex-Datei (Hex file) 


ASCII-Darstellung einer Befehls- oder Maschinencode-Datei. 


Hochstwertiges Bit (Most significant bit, MSB) 


Das in einer Binarzahl] am weitesten links stehende Bit. 


Hohere Programmiersprache (Higher level language) 
Sprache wie BASIC, die der menschlichen Sprache angelehnt ist, so dal} sie sehr 


leicht interpretiert werden kann. Langsamer als Maschinencode-ahnliche 
Sprachen, dafiir viel leichter zu verstehen. 


TEEE-488 
Eine der Standardschnittstellen fiir den Anschlu8 von Geraten an einen 


Mikrocomputer. Ahnlich der Centronics-Parallelschnittstelle, jedoch nicht vollig 
mit ihr kompatibel. 


Informationstechnik (Information technology) 


Alles was mit elektronischer Nachrichtenverarbeitung und Kommunikation zu 
tun hat: Textverarbeitung, Dateniibertragung, Btx, usw. 
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Inhaltsverzeichnis (Directory) 


Diskettenabschnitt, der fir jede auf der Diskette gespeicherte Datei einen Eintrag 
enthalt. 


Initialisieren (Initialise) 


Ein System einschalten, oder vor dem Start des Hauptprogramms Variablen mit 
einem bestimmten Wert belegen, d.h. die Dimension eines Arrays festlegen, alle 
Variablen als Ganzzahlen deklarieren 0.4. 


Integrierte Schaltung (Integrated circuit) 


Eine Sammlung winzig kleiner elektronischer Schaltungselemente auf einem 
einzigen Siliziumplattchen (siehe Chip). 


Intelligentes Datensichtgerat (Intelligent terminal) 


Ein Datensichtgerat, bei dem auBer der Behandlung von Eingabe und Ausgabe 
far den Computer auch eine lokale Bearbeitung méglich ist, wenn das Gerat 
‘offline’ ist. 


Interaktiv (Interactive) 


Dialog zwischen Anwender und Programm, wobei der Anwender aufgefordert 
wird, etwas einzugeben. Das kann die Steuerung eines Raumschiffs in einem 
Automatenspiel oder die Beantwortung von Fragen in einem Lehrprogramm sein. 
Die Handlung des Anwenders beeinflufit den Ablauf des Programms unmittelbar. 


Interpreter 


Element der Systemsoftware, das die héhere Programmiersprache fir die CPU in 
Maschinensprache verwandelt. Uber die Tastatur eingegebene BASIC-Befehle 
werden also vom Interpreter in eine fiir den Computer verstandliche Form 
gesetzt. 


Iteration 


Ein Prinzip der Datenverarbeitung. Der Computer zerlegt alle Aufgaben in 
einfache kleine Schritte, die von der CPU bewAltigt werden kénnen. Dazu muf er 
zwischen vielen einfachen Elementen hin-und herwandern, bis eine gegebene 
Bedingung erfiillt ist. 
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Joystick 


Auch Steuerknippel genannt. Ein Eingabegerdt, das im wesentlichen die 
Funktionen der Cursortasten ibernimmt. Damit ]a8t sich in Spielen leichter und 
schneller steuern. 


K 


Die Abktrzung fiir Kilo (1000). In der Datenverarbeitung als Kurzform fir 
Kilobyte verwendet. Eine Kilobyte sind 1024 Byte, ein Binarwert (2 hoch 10), der 
dem Dezimalwert 1000 am nachsten kommt. 


Kaltstart (Cold start) 


Booten und Initialisieren eines Betriebssystems. CP/M wird durch den Befehl 
1 CPM kaltgestartet. 


Knoten (Node) 


Speichereinheit im LOGO-Arbeitsbereich, die normalerweise 4 Bytes umfaBt. 


Kommando (Command) 


Eine Anweisung in einem Programm. 


Konsolmodus (Console mode) 


CP/M-Direktmodus. Auf dem Bildschirm erscheint A>, d.h. das System erwartet 
die Eingabe eines CP/M- oder Dienstprogramm-Befehls. 


Korrumpierung (Corruption) 


Unerwiinschte und mdglicherweise irreversible Zerstérung oder Veranderung des 
Inhalts einer Datei oder des Speichers. 


Kunstliche Intelligenz (Artificial intelligence, AI) 


Kine Konstruktion in der Programmtechnik, die es dem Programm ermiglicht, 
aus vorheriger Erfahrung zu lernen. 
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Leistungstest (Benchmark) 
Eine Standardaufgabe fiir die Ermittlung von  Geschwindigkeit, 


Leistungsfahigkeit und Genauigkeit verschiedener Computer, z.B. Wurzel aus 
99.999 zum Quadrat. 


Lichtgriffel (Light pen) 

Eine andere Kingabeméglichkeit, bei der ein Stift oder ‘Zauberstab’ benutzt wird. 

Lisp 

Kurzform fiir LISt Processor Language. Eine andere héhere Programmiersprache. 
Logik (Logic) 

Die elektronischen Komponenten, die die elementaren logischen Operationen und 


Funktionen ausfiihren, aus denen jeder Vorgang im Computer letztendlich 
besteht. 


Logisches Gerat (Logical device) 
Ausformung eines Gerats, das sich von der physikalischen Erscheinungform 


unterscheiden kann. So kann beispielsweise das logische CP/M-Gerat LST der 
Centronicsschnittstelle oder dem Datensichtgerat zugeordnet werden. 


LOGO 
Eine einfach erlernbare, graphikorientierte Programmiersprache, die in Schulen 


haufig im Programmierunterricht verwendet wird. Der Name ist vom 
griechischen Wort ‘logos’ fiir ‘Wort’ abgeleitet. 


LSI 
Large Scale Integration (Hochgradige Integration). Die Entwicklung von 


integrierten Schaltungen, bei der immer mehr Funktionen auf immer kleineren 
Stickchen Silizium untergebracht werden. 


Maschinenlesbar (Machine readable) 


Charakterisiert die Darstellungsform von Daten, die das Lesen der Daten durch 
Maschinen gestattet. 
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Maschinencode (Machine code) 


Programmiersprache, die der Mikroprozessor direkt versteht, da alle ihre 
Kommandos als Bitmuster dargestellt werden. 


Matrix 
Die Anordnung von Punkten, in der eine Zeichen‘zelle’ auf dem Bildschirm oder 


dem Druckkopf eines Matrixdruckers dargestellt wird. Wird auch in der 
Mathematik und Informatik zur Beschreibung von Gittern verwendet. 


Maus (Mouse) 
Ein Eingabegerat auf Rollen. Die Maus wird auf dem Tisch hin- und herbewegt, 
meist um den Cursor auf dem Bildschirm zu steuern. Urspringlich wurde die 


Maus entwickelt, um die Angst vor Tastaturen zu nehmen und die Software 
anwenderfreundlicher zu machen. 


Mensch-Maschinen-Schnittstelle (Man-machine interface) 


Bertihrungspunkt zwischen Computer und Anwender: Tastatur, Bildschirm, usw. 


Ment 

Eine Auswahlliste der verschiedenen Funktionen, die ein Programm ausfihren 
kann. 

Mikroprozessor (Microprocessor) 

Integrierte Schaltung im Herzen des Mikrocomputers, welche die vom 


BASIC-Interpreter tibergebenen Anweisungen ausfiihrt, um die verschiedenen 
Ausgabegerate und Optionen zu steuern. 


Modem 


Kombinierter MOdulator/DEModulator, der den Anschlu8 des Computers an eine 
Telefonleitung oder  sonstige serielle Dateniibertragungseinrichtung, 
einschlieBlich Glasfaserkabel, erméglicht. Siehe auch Akustikkoppler. 
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Monitor 
Der Bildschirm eines Computerterminals. Auch Bezeichnung ftir ein Programm 


in Maschinensprache, das die elementaren Maschinenoperationen des Computers 
regelt. 


Netz (Network) 


Ein System aus zwei oder mehr Computern, die durch Leitungen oder Modems 
miteinander verbunden sind, um Daten oder Informationen auszutauschen. 


Niedere Programmiersprache (Low level language) 


Programmiersprache wie z.B. Assembler, bei der jede Anweisung einer 
Maschinencode-Anweisung entspricht. 


Niederwertigstes Bit (Least significant bit) 


In einer Binarzah] das am weitesten rechts stehende Bit. 


Numerisches Tastenfeld (Numeric keypad) 
Bereich der Tastatur, in dem Zahlentasten zusammengruppiert sind, um 


numerische Daten leichter eintippen zu kénnen. Beim 6128 kénnen diese Tasten 
zusatzlich als Funktionstasten definiert werden. 


OCR 
Optical Character Recognition (Optische Zeichenerkennung). System, das 


gedruckte oder handgeschriebene Zeichen durch ein optisches Lesegerat erfaft 
und direkt in Daten umwandelt, die fiir den Computer lesbar sind. 


Off line 
Peripheres Gerat - meist ein Datensichtgerat oder ein Drucker - das nicht an die 


Hauptprozessoreinheit angeschlossen ist, auf das also nicht zugegriffen werden 
kann. 


Oktalsystem (Octal) 


Zahlensystem mit der Basis 8, in dem jede Ziffer (0 bis 7) aus drei Bits gebildet 
wird. 
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On line 


Gegenteil von ‘Off line’. 


Operator 


Der Teil eines arithmetischen Ausdrucks, der eine Zahl mit einer anderen 
verkniipft,z.B.+ - * . 


Page Zero 


Bezieht sich auf einen Speicherbereich in der CP/M-Umgebung, im Adressbereich 
zwischen &0000 und &0100, der wichtige System-Parameter enthalt. 


Paperware 


Unter Paperware wird das gedruckte Begleitmaterial zu einem Produkt (z.B. 
dieses Handbuch) zusammengefaft. 


Parallele Schnittstelle (Parallel interface) 


Die CPC6128-Druckerschnittstelle unterstiitzt einen parallelen Drucker, d.h. 
jeder Datenausgang des Bus ist mit einem entsprechenden Dateneingang des 
Druckers verbunden. Die Dateniibertragung tiber eine Parallelschnittstelle lauft 
viel schneller als tiber eine serielle Schnittstelle, da bei serieller Verarbeitung 
die Daten erst in eine Bytedarstellung mit Synchronisationsinformation 
umgeformt werden miissen. 


Pascal 


Hohere, systematisch strukturierte Programmiersprache, bei der ein Programm 
erst compiliert werden mu8, bevor es ablaufen kann - dafir lauft es dann sehr 
schnell. Im allgemeinen die Sprache, die sich ein eifriger BASIC-Schiler als 
nachstes aneignet. 


PEEK 


BASIC-Funktion, die Einblick in den Computerspeicher erméglicht und den an 
einer bestimmten Stelle befindlichen Wert ausgibt. 
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Peripheres Gerat (Peripheral) 


Drucker, Modems, Joysticks, Kassettenlaufwerke - alles was an den Computer 
angeschlossen werden kann, um seine Fahigkeiten zu erweitern. 


Physikalisches Gerat (Physical device) 


Ein tatsachlich existierendes Hardware-Gerat. Physikalische Geradte kénnen 
logischen Geraten zugeordnet werden. 


Pixel 


Der kleinste Teilbereich des Bildschirms, auf den durch die Harware bedingt 
zugegriffen werden kann. 


Plotter 


Eine Abwandlung des Druckers, die Strichzeichnungen mit Zeichenstiften 
erstellt, und im Gegensatz zu einem Drucker ohne Druckkopf arbeitet. 


POKE 


Eine BASIC-Anweisung, mit der ein Wert an eine bestimmte Stelle des Speichers 
geschrieben werden kann. 


Port 


Eine adressierbare Stelle auf einer Schnittstelle (Interface) fir die Eingabe oder 
Ausgabe von Daten. 


Portabilitat (Portability) 


Die Moéglichkeit, Software auf Computern verschiedener Hersteller laufen zu 
lassen. Meist wird dies durch kompatible Betriebssysteme, wie CP/M von Digital 
Reasearch, erreicht. 


Primitive (Primitives) 


Prozeduren, Funktionen oder Befehle, aus denen die LOGO-Sprache besteht. 
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Programm 


Eine Kombination von Befehlen, die den Computer veranlassen, eine Aufgabe zu 
erfiillen. Hierunter fallt alles von der einfachen Maschinencode-‘Routine’ bis zum 
vollstandigen Anwenderprogramm, wie z.B. Textverarbeitung. 


Programmentwicklung (Software engineering) 


Ein Ausdruck fiir Programmierung mittels Strukturierung und Planung statt mit 
willktrlichen Techniken. 


Programmiersprache (Programming language) 


Mittel zum Schreiben eines Programms. Eine Programmiersprache zeichnet sich 
durch strikte Regeln fiir die Gebrauch der Worter und Zahlen und fir die 
Einhaltung der richtigen Reihenfolge aus. 


PROM 


Programmable Read Only Memory (Programmierbarer, nur lesbarer Speicher). 
Eine integrierte Speicherschaltung, die, einmal beschrieben, nicht mehr geléscht 
werden kann. (Siehe EPROM) 


Prompt 


Bereitschaftszeichen. Kurze Meldung oder Zeichenfolge, die den Anwender zur 
Eingabe einer Anweisung auffordert. Das CP/M-Prompt ist >, bei Dr. LOGO heifit 


es ? 


Prozedur (Procedure) 


Eine Reihe von Ausdrticken oder Programm-Anweisungen, die die Ausfiihrung 
einer bestimmten Aufgabe bewirken. 


Puffer (Buffer) 


Zwischenspeicher. Speicherbereich, der Daten wahrend einer Informationstber- 
tragung voribergehend aufnimmt. 
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Punktmatrix (Dot matrix) 


Rechteckiges Gitter, auf dem ein Zeichen durch Auswahl einzelner Felder 
(Punkte) dargestellt werden kann. 


Quittungsbetrieb (Handshaking) 
Eine Folge elektronischer Signale, die den Datenaustausch zwischen Computer 


und Peripheriegerat, bzw. zwischen zwei Computern in Gang setzen, priifen und 
synchronisieren. 


RAM 
Random Access Memory. Speichereinheit, die mit der internen Schaltung des 


Computers wahrend eines normalen Programmablaufs sowohl gelesen als auch 
beschrieben werden kann. 


Rasterverfahren (raster scan) 
Darstellungstechnik auf Bildschirmen. Das Bild entsteht durch horizontales 


Abtasten des Bildschirms mit einem Elektronenstrahl, der dabei bestimmte 
Punkte aufleuchten laf8t. 


Read only, R/O 


Bezeichnet Disketten, Diskettendateien oder -laufwerke, die nicht beschrieben 
oder verandert werden kénnen. 


Read write, R/W 


Bezeichnet Disketten, Diskettendateien oder -laufwerke, die sowohl gelesen als 
auch beschrieben werden kénnen. 


Reelle Zahl (Real number) 


Kine Zahl mit Bruchteil, die also im Gegensatz zur Ganzzahl auch Stellen hinter 
dem Dezimalpunkt aufweist. 


Register 


Speicher in der CPU, wo Daten zwischengespeichert werden. 
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Rekursion (Recursion) 


Reihe sich wiederholender Schritte in einem Programm oder einer Routine, wobei 
jede Wiederholung auf dem Ergebnis des vorangegangenen Durchgangs aufbaut. 


Reserviertes Wort (Reserved word) 


Ein Wort, das in einem Programm eine besondere Bedeutung hat, und nur in 
einem bestimmten Zusammenhang gebraucht werden darf. Z.B. wird BASIC das 
Wort TAG nicht als Variablennamen annehmen, da es schon fiir einen anderen 
Zweck reserviert ist. 


RF Modulator 


Mittel, durch das Video-Signale vom Computer verschliisselt und zum 
Antenneneingang eines Fernsehgerates gesendet werden kénnen. 


ROM 


Read Only Memory (nur lesbarer Speicher). Bezieht sich im allgemeinen auf 
Halbleiterspeicher, die einmal beschrieben, weder geléscht noch wtiberschrieben 
werden kénnen. 


Routine 


Teil des Programms, der eine Routineaufgabe erledigt. Eine Routine ist entweder 
Teil eines Hauptprogramms oder ein Programm, das in verschiedenen 
Programmen mitverwendet wird. Ein Programm z.B., das die Computer-Uhr in 
eine 12-Stunden-Uhr umgestaltet, kann als Routine betrachtet werden. 


RPN 


Reverse Polish Notation (umgekehrte polnische Notation). Von manchen 
Herstellern bevorzugte Darstellung arithmetischer Operationen, bei der die 
Operatoren (+, -, *, / usw.) hinter den zugehérigen Werten erscheinen. 


RS232C 


Standardnorm fiir serielle Datentbertragungsschnittstellen. Gerate an beiden 
Enden der Ubertragungsstrecke miissen an die spezifischen Bedingungen der 
benutzten RS232-Schnittstelle angepaBt sein. Die entsprechende Standardnorm 
fiir parallele Datentibertragung ist die Centronics-Parallelschnittstelle. 
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Schildkrote (Turtle) 


Graphiksymbol in der Form einer Pfeilspitze, das bei Dr.LOGO als 
Graphik-Cursor dient. 


Schildkroten-Graphik (Turtle graphics) 


Graphische Darstellung, die durch die Spur der umherwandernden Schildkrote 
auf dem Bildschirm erzeugt wird. 


Schildkrotenschritt (Turtle step) 


Kurzeste Entfernung, die eine Schildkréte zuriicklegen kann. In der Regel ist dies 
ein Pixel. 


Schleife (Loop) 


Ein Proze8 im Programm, der solange wiederholt wird, bis eine bestimmte 
Bedingung eingetreten ist. 


Schlisselfertig (Turn key) 


Bezeichnung fiir ein Programm, das nach dem Laden des Betriebssystems 
automatisch ablauft. 


Schlusselwort (Keyword) 


Ein Wort, dessen Gebrauch in einem Programm oder einer Computersprache fir 
eine spezielle Funktion oder einen Befehl reserviert ist. 


Schnittstelle (Interface) 
Ein- und Ausgang des Computers. Als Schnittstellen beim CPC6128 gelten die 


Tastatur (Eingabe), der Bildschirm (Ausgabe) und die Vorrichtungen fir den 
Anschluf der Peripheriegerate an die verschiedenen Buchsen. 


Schreibmaschinentastatur 


Begriff fiir die Computertastatur, bei der die Tasten wie auf einer 
Schreibmaschine angeordnet sind. 
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Schreibschutz (Write protection) 


Eine Sicherungsvorrichtung zum Schutz vor dem Uberschreiben einer Diskette 
oder Diskettendatei. Eine schreibgeschiitzte Diskette oder Datei ist nur lesbar. 


Scrolling 


Vorgang, bei dem die Zeilen des Bildschirms nach oben wegrollen, um in der 
untersten Zeile Platz fiir neue Eingaben oder Ausgaben zu machen. 


Sektor (Sector) 


Datenblock auf einer Diskette. Im Schneider Diskettensystem umfaft ein Sektor 
512 Bytes. 


Serielle Schnittstelle (Serial interface) 


Bezieht sich fast immer auf die RS232-Schnittstelle, obwohl es noch andere 
serielle Schnittstellen fiir die serielle Datentibertragung gibt. 


Simulation 

Eine Technik, lebensnahe Aktionen mit Hilfe des Computers nachzuahmen, z.B. 
Flug-, Fahrsimulation usw. 

Software 


Programme auf Diskette, Kassette, ROM usw. 


Speicher (Memory) 


Der Bereich im Computer, wo Informationen und Daten sduberlich geordnet 
zwischengelagert werden, so da auf jedes Element einzeln zugegriffen werden 
kann. Zum Speicher gehoren der RAM (Random Access Memory), der beliebig 
beschrieben und gelesen werden kann, und der ROM (Read Only Memory), der 
nur gelesen, aber nicht beschrieben werden kann. Disketten und Magnetbander 
sind Beispiele fiir Massenspeicher. 
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Speicherbelegungsplan (Memory map) 


Darstellung des Speichers, aus der die verschiedenen Adressbereiche und die 
Speicherzuordnung fiir die einzelnen Funktionen, wie Bildschirm und 
Diskettenbetriebssystem, hervorgehen. 


Spracherkennung (Speech recognition) 


Umwandlung gesprochener Worter in maschinenlesbare Anweisungen. 


Sprachsynthese (Speech synthesis) 


Erzeugung ktnstlicher Sprache mit Hilfe von Hard- und Software. 


Sprite 


Ein von spezieller Hardware oder Software erzeugtes Zeichen, das sich frei auf 
dem Bildschirm bewegen und beliebig auftauchen oder wieder verschwinden 
kann. 


Spuren (Tracks) 


Konzentrische Ringe auf einer Diskette. Jede Spur ist in mehrere Sektoren 
eingeteilt. Beim Formatieren wird die Diskette in Spuren und Sektoren 
eingeteilt. 


Standardannahme (default) 


Der Wert, den der Computer einsetzt, wenn der Benutzer nichts anderes angibt. 
Wenn beispielsweise CP/M gestartet wird, nimmt der Computer Laufwerk A: als 
Standard-Laufwerk an. 


Stapel (Stack) 


Ein Speicherbereich, in dem Informationen gestapelt werden. Es kann immer nur 
das ‘obenliegende’, d.h. zuletzt eingelesene Element gelesen werden. 
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Steckmodul (Cartridge) 


Eine speziell verpackte Speichereinheit mit integrierten Schaltungen, die 
Software enthalt und direkt in dafiir vorgesehene Buchsen des Computers 
gesteckt werden konnen. Diese Software wird schneller geladen und lauft auch 
schneller als Diskettensoftware, ist jedoch wesentlich teurer. 


Steuerkniippel 


Siehe Joystick 


Stream 


Das Gerat, tber das der Computer Informationen ausgibt, z.B. Bildschirm, 
Drucker oder Diskette. 


Strichcode (Bar code) 
Beispiele befinden sich auf vielen Lebensmittelpackungen. Ein Code aus Linien 


unterschiedlicher Starke, der mit einem Lesegerat erfaRt und vom Computer 
ausgewertet werden kann. 


String 
Aus einer Zeichenfolge bestehende Daten, die nicht als numerisch betrachtet 
werden kénnen. Selbst wenn sie nur aus numerischen Zeichen bestehen, gelten 


sie nicht als numerisch, solange sie nicht durch ein entsprechendes 
Umwandlungskommando einer numerischen Variablen zugewiesen worden sind. 


Strukturierte Programmierung (Structured programming) 


Art der Programmierung, die logischen Aufbau und Ubersichtlichkeit anstrebt. 
Im Ergebnis verlaufen diese Programme in klaren Schritten von ‘oben nach 
unten’. 


Syntaxfehler (Syntax error) 


Wenn die Regeln fir die Benutzung der Schliisselwérter und Variablen nicht 
eingehalten wurden, gibt BASIC diese Meldung fiir den Anwender aus. 
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Systemspuren (System tracks) 


Fur das CP/M-System reservierte Disketten-Spuren. 


Tabellenkalkulation (Spreadsheet) 


Ein Programm, bei dem Zahlen in eine Tabelle eingetragen und vom Computer 
berechnet werden. Wird eine Zahl geandert, so werden alle damit verbundenen 
Berechnungen erneut durchgefiihrt und das neue Ergebnis angezeigt. 


Tastatur (Keyboard) 


Mehrere Reihen von alphanumerischen Tastenschaltern, un Kommandos 
und andere Informationen in den Computer eingeben zu kénnen. 


Terminal 


Ein Texteingabegerat, bestehend aus einer Tastatur mit Bildschirm oder 
Fernschreiber. 


Tongenerator (Sound generator) 


Teil eines Computers, der Téne oder Gerausche erzeugt. Kann sowohl Hardware 
als auch Software sein. 


TPA 


Transient Program Area. Speicherbereich ab Adresse &0100, wo 
CP/M-Anwenderprogramme und -daten gespeichert werden. 


Transientes Programm (Transient program) 


Ein CP/M-Dienstprogramm wie PIP, das in den TPA geladen und durch Eingabe 
seines Namens gestartet werden kann. 


Trennzeichen (Separator) 


Markiert die Grenze zwischen reservierten Wértern und anderen Elementen des 
Programms oder zwischen Daten. 
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Typenrad-Drucker (Daisy-wheel printer) 


Drucker, der Dokumente in Schreibmaschinenqualitaét ausdruckt. Die Zeichen 
werden durch Druck einer Type gegen ein Farbband erzeugt. 


Uberschreiben (Overwrite) 


Léschen von Daten im Speicher durch Uberschreiben mit neuen Daten. 


Uhr (Clock) 


Zeitmefisystem 1m Computer, das den zeitlichen Ablauf und die Synchronisation 
seiner Vorgange steuert. Eine Echtzeituhr gibt Zeit und Datum an. 


Umgekehrte Polnische Notation 


Siehe RPN 


Unintelligentes Datensichtgerat (Dumb terminal) 
Ein Datensichtgerat, das nur zur Datenein- und -ausgabe dient, ohne die Daten 


bearbeiten zu kénnen. Alle Abbildungen auf dem Bildschirm sind reine 
Videodarstellungen. 


Universalzeichen (Wild card character) 
Die Zeichen * und ? sind Universalzeichen. Dr.LOGO unterstiitzt nur ?. Das 
Sternchen * steht fiir eine beliebige Anzahl von Fragezeichen ? . Diese Zeichen 


werden benutzt, um einen mehrdeutigen Dateinamen anzugeben. Dabei ersetzt 
jedes Fragezeichen einen Buchstaben oder eine Zahl im Dateinamen. 


Unterprogramm (Subroutine) 


Siehe Routine 


Urlader (Bootstrap) 
Kleines Programm im ROM (normalerweise), das den Anfangsteil eines 


Programms oder Betriebssystems in den Speicher ladt, so da8 das Programm oder 
System gestartet werden kann und den Ladevorgang selbstandig weiterfihrt. 
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Variable 


Ein Element in einem Programm, das mit einem Namen angesprochen werden 
kann, dessen tatsachlicher Wert sich jedoch wahrend des Programmablaufs 
andern kann. 


Vorzeichenlose Zahl (Unsigned number) 


Eine Zahl, die nicht als positiv oder negativ gekennzeichnet ist. 


Wahrheitstafel (Truth table) 


Das Ergebnis einer logischen Operation ist entweder ‘wahr’ oder ‘falsch’, vom 
Computer durch 1 bzw. 0 dargestellt. Eine Aufstellung aller méglichen 
Ergebnisse einer logischen Operation (z.B. IF A>B THEN C) _ heift 
Wahrheitstafel. 


Warmstart (Warm start) 


Kin Warmstart wird unter CP/M durch Betatigen der [CONTROLJC-Taste 
ausgelést. Er reinitialisiert das Disketten-Subsystem und tibergibt die Steuerung 
an CP/M, woraufhin Befehle eingegeben werden kénnen. 


Wild card 


Siehe Universalzeichen 


Zeichen (Character) 


Buchstabe, Zahl] oder graphisches Symbol, das im Computer dargestellt und von 
ihm ausgegeben werden kann. 


Zeichenfolge (String) 


Eine Folge von Zeichen, die als Einheit gespeichert oder bearbeitet werden kann, 
z.B. ein Wort oder eine Kette von Worten. 
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Zeichensatz (Character set) 


Alle Buchstaben, Zahlen und Symbole, die in einem Computer oder auf einem 
Drucker zur Verfiigung stehen. Wenn ein Zeichen im Computer vorhanden ist, 
bedeutet dies nicht unbedingt, da8 es auch zum Zeichensatz des Druckers gehort. 


Zeilennummer (Line number) 


Bei BASIC und anderen Sprachen sind die Anweisungen durch Zeilennummern 
geordnet. 


Zufaliszahl (Random number) 


Eine vom Computer erzeugte Zahl, die weder wiederholbar noch vorraussagbar 
ist. 


Fachworterverzeichnis Anhang 2 Seite 33 


Anhang 3 
6 Programme fur Computerspiele 


Ausbrechen 


Einfach, aber macht siichtig! Fiir einen Spieler gegen den Computer. Mit Tasten oder 
Joystick. 


18 'BUSTOUT by ALEXANDER MARTIN 
20 'copyright (c) AMSOFT 1984 
1] 


40 MODE 1:BORDER 1:INK O,1:INK 1,26:INK 2,24:INK 3,6 
5@ SPEED KEY 15,2 
60 ENV 1,1,18,0,11,0,10 
78 ENT 1,10,2,2 
8B ENV 3,1,0,16,5,-3,2 
9B ENV 2,5,3,3,1,721,22,9,-3y2 
100 ENT -2,18,2,2,5,-7,1,2,11,3,2,-4,8 
1 


126 ' 

130 MOVE 30,32:DRAWR @,400,1:MOVE 610,32:DRAWR @0,488,1 

146 PEN 3:LOCATE 3,1:PRINT STRINGS$(36,143) 

158 PEN 2:LOCATE 3,2:PRINT STRINGS(36,143) 

168 PEN 1:FOR r=5 TO 6:LOCATE 3,r:PRINT STRINGS(36,143) 
=NEXT r , 

178 bx=9 

180 lives=5:score=8 

190 PEN 1:GOSUB 68@:CLEAR INPUT 

2086 IF INKEYS<>CHR$(32) AND JOY(8)<16 THEN 288 

218 LOCATE 11,23:PRINT SPACES(28):LOCATE 1,24:PRINT SPA 


CE$(48); 
228 GOSUB 698:GOSUB 66@:G0TO 288 
236 ' 
248 ' 
258 LOCATE bx,24:PRINT" ";STRING$S(4,131);" ":RETURN 
“ 268 ' 
276 ' 


280 xa=1:ya=1:1F INTCRND*2)=1 THEN xa=-xa 
298 PEN 1:GOSUB 256 

308 ORIGIN 0,408 

318 x=bxt+4:y=11:xl=x:iyl=y 


330 ' 
348 x1=x+xa:yl=ytya 
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350 
366 
370 


386 
396 
400 
418 


420 
430 
446 
456 


460 
476 
480 
490 
508 


518 
520 
538 
548 


558 


568 
- 578 
580 
598 
600 
618 
628 
638 
648 
658 
660 


6708 
688 


696 


IF x1=3 OR x1=38 THEN xa=-xa 

GOSUB 548 

IF y1=24 AND x1>bx+1 AND x1<bx+6 THEN ya=-ya:yt=y1- 
2:SOUND 130,44,8,7,1,1:a=((x>bxt5)0R(x<bxt2)):1F a= 
-1 THEN xa=xa*a:x1t=x1+xa:yl=y1+1 

IF y1=25 THEN LOCATE x,y:PRINT" ":GOTO 580 

GOSUB 258 

t=TEST((16%x1)-1,-(16*y1)-1) 

IF t<>@ THEN ya=~-ya:xz=x1l:iyz=yl:yl=y1+ya:GOSUB 598: 
IF t=2 THEN score=score+1@:GOSUB 668 

IF t=3 THEN score=score+2@:GOSUB 668 

IF t=1 THEN score=score+5:GOSUB 66@ 

IF y1=1 THEN ya=1 

LOCATE x,y:PRINT " "LOCATE x1,y1:PRINT CHRS$(233):x 
=xX1iy=y1 

IF y=1 OR x=3 OR x=38 THEN SOUND 129,78,8,7,1,1 
GOTO 346 

t 


lLives=lLives-1:SOUND 132,19,46,12,2,2:1F lives=@ THE 
N GOTO 628 

GOSUB 668:GO0TO 286 

J 


IF CINKEY(8)=@ OR INKEY(74)=8) AND bx>2 THEN bx=bx- 
2:RETURN 

IF CINKEY(1)=@ OR INKEY(75)=@) AND bx<32 THEN bx=bx 
+2:RETURN 

RETURN 

t 


LOCATE xz,yz:PRINT " ":RETURN 
' 


IF score>=hiscore THEN hiscore=score 
GOSUB 66@:score=@: lives=5:GOTO 138 
' 


SOUND 136,0,20,13,3,0,31:LOCATE 1,25:PRINT TAB(4)"H 
ISCORE";hiscore; 

LOCATE 18,25:PRINT"SCORE";score:LOCATE 38,25:PRINT"” 
LIVES"; Lives:RETURN 

LOCATE 11,23:PRINT"Druecke Leertaste zum Start":RET 
URN 

LOCATE 1,25:PRINT SPACES$(48);:RETURN 
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Bomber 


Eine Variation zum klassischen Thema. Fir einen Spieler gegen den Computer. 
Nur mit Tasten. 


10 
20 
30 
48 


58 
66 


188 
118 
126 


138 
148 
158 
168 
178 


"BOMBER von DAVE TOWN 
‘copyright (c) AMSOFT 1984 
' 


MODE 1:CLS:INK @,@:BORDER @:INK 1,18:INK 2,6:INK 3,4 
INK 5,15:INK 6,2: INK 7,24:INK 8,8:INK 9,26:INK 18,1 
B@:INK 11,26:1INK 12,12:INK 13,16:INK 14,14:INK 15,21 
SYMBOL AFTER 240:SYMBOL 241,840,860,8&70,8&7F ,&7F,&35F, 
&7,88:SYMBOL 242,80,832,&87A,8FE,&FA,&F2,8E0, 8&0 
score=O:hiscore=@:plane$=CHRS(241)+CHRS$(242):x=2:y=2 
:drop=8:a=2:b=2 


GOSUB 4886 
CLS 
PEN 2:LOCATE 1,15:INPUT"Schwierigkeitsgrad angeben: 
0 (Profil) bis 5 (Anfaenger) : ",skill 

IF skill<@ OR skill>5 GOTO 90 

skill=skill+1@ 

LOCATE 1,15:PRINT CHRS(18);:LOCATE 1,15:INPUT"Gesch 
windigkeit angeben: (schnell) bis 188 (langsam) : " 
,rate 

IF rate>1@6 OR rate<@ GOTO 128 

' 

"Gebaeude 

MODE @:FOR base=5 TO 15:FOR height=21 TO INTCRND(1) 
*8+skill) STEP -1:LOCATE base,height:PEN base-2:PRI 
NT CHRS(143)+CHRS(8)+CHRS(11)+CHRS(244);:NEXT :NEXT 
PLOT 8,20,4:DRAW 640,20,4 

LOCATE 1,25:PEN 2:PRINT"STAND";score;:LOCATE 13,25: 
PRINT"REK";hiscore; 

' 

Spies 

LOCATE x-1,y:PRINT" we 

PEN 1:LOCATE x,y:PRINT planes; :PEN 2 

IF y=21 AND x=15 THEN GOTO 29@:ELSE GOTO 348 
"Gelandet 

' 

FOR c=6 TO 1800:NEXT 
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300 


316 
320 
338 
340 
358 
360 


498 


score=scoret1O@O-(skill*2):skill=skill-1:x=2:y=2:a=2 
:b=2:drop=@ 

IF skill<1@ THEN skill=18:rate=rate-29 

IF rate<@ THEN rate=6 

GOTO 158 

FOR c=@ TO rate:NEXT 

X=X+1 

IF x=18 THEN LOCATE x-1,y:PRINT CHRS(18);:x=2:y=yt1 
:LOCATE x,y:PEN 1:PRINT plane$;:PEN 2 

aS=INKEY$:1IF a$=" " AND drop=@ THEN drop=1:b=y+2:a= 
x 

IF y=21 THEN drop=@ 

IF drop=1 THEN LOCATE a,b:PRINT CHR$(252);:LOCATE a 
,o-1:PRINT" ";:sb=b+1:1F b>21 THEN LOCATE a,b:PRINT" 
";:LOCATE a,b-1:PRINT” ";:a=@:b=O:drop=@:SOUND 3,4 

600,18,12,0,0,18 

ga=(a-8.5)*32:gb=488-(b*16) :bomb=TEST(ga,gb) 

IF bomb>@ THEN GOTO 678 

gx=((x4+1.5)*32) :gy=408-Cy*16):crash=TEST(gx,gy) 

IF crash>@ GOTO 578 

GOTO 230 


"Anweisungen 

' 

LOCATE 1,2:PEN 1:PRINT"Sie steuern ein Flugzeug ueb 
er einer verlassenen Stadt und muessen alle Gebaeud 
e zerstoeren, um Landen und tanken zu koennen. Ihr 

Flugzeug bewegt sich von links nach rechts ueber de 
n Bildschirm.";:PRINT 

PRINT:PRINT"Wenn Sie die rechte Seite erreichen, ta 
ucht Ihr Flugzeug EINE ZEILE TIEFER am linken Rand 

des Bildschirms wieder auf. Durch Druck auf die LEE 
RTASTE koennen Sie eine Bombe aus Ihrem unbegrenzte 
n Vorrat abwerfen";:PRINT 

PRINT:PRINT"Jedesmal, wenn Sie Landen, werden entwe 
der die Gebaeude hoeher oder Ihre Geschwindigkeit s 
teigt.";:PRINT:PRINT:PRINT"WENN SIE EINE BOMBE ABGE 
WORFEN HABEN, MUESSEN SIE WARTEN, BIS SIE EXPLODIER 
T IST, BEVOR SIE EINE WEITERE ABWERFEN KOENNEN!!!"; 
PEN 2:LOCATE 1,24:PRINT:PRINT"START mit beliebiger 

Taste."; 

aS=INKEYS:IF a$="" GOTO 526 

RETURN 

1 


'Zusammenstoss 
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700 


LOCATE x-1,y:PRINT CHR$(32)+CHRS(32)+CHRS$(32)+CHRS( 
253)+CHRS$(8)+CHRS(238)+CHRS(8); 

FOR t=1 TO 1@:SOUND 7,4000,5,15,0,0,5:PEN t:PRINT C 
HR$(253)+CHR$(8) +CHRS( 238) +CHRS(8)+CHRS(32)+CHRS(8) 
;rFOR tm=6 TO 5O:NEXT:NEXT:PEN 2 

CLS:LOCATE 1,5:PRINT"Punkte";score; 

IF score>hiscore THEN hiscore=score:LOCATE 1,8:PRIN 
T"NEUER REKORD!!"'; 

score=9:LOCATE 1,12:PRINT"Neuer Start mit R"; 
aS=INKEY$S:IF a$="r" OR aS="R" GOTO 630 ELSE GOTO 62 
6 

PEN 1:MODE 1:x=2:y=2:a=2:b=2:GO0T0O 9@ 

T 


'Bombardierte Gebaeude 

' 

LOCATE a,b-1:PRINT" "+CHR$(8);:PEN 4:FOR tr=1 TO IN 
TCRND(1)*3)+1:score=score+5:SOUND 3,4008,18,12,0,0, 
1@:LOCATE a,b:FOR t=8 TO 4:PRINT CHRS$(253)+CHRS(8)+ 
CHR$(32)+CHRS(8);:NEXT: b=b+1 

IF b=24 THEN b=b-1 

NEXT 

LOCATE 6,25:PRINT score;:drop=@:a=x:b=y:GO0TO 238 
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Telly 


tennis 


Dieser “Urvater” aller Computerspiele macht auch heute noch Spaf. Sie kénnen 
alleine gegen den Computer oder zu zweit spielen. Sie steuern mit Tasten oder 
Joystick(s). 


10 
20 
30 
40 
50 
68 
a) 
80 
90 
100 
110 
128 
136 
148 
150 
166 
176 
188 
198 


208 
210 
220 
230 
246 
258 
260 
278 
280 
290 
300 
318 


320 
330 
348 
350 
368 


"TELLY TENNIS von DAVID RADISIC 
"copyright (c) AMSOFT 1985 
iJ 


DEFINT a-z 
comp=1 
ENV 1,=11,20,=9,5008 
MODE 1:INK @,18:BORDER 1@:INK 1,26:INK 2,18:INK 3,8 
GOSUB 718 
GOSUB 156 
GOSUB 338 
GOSUB 426 
LOCATE 13,1:PRINT USING"#### ";scorel; 
LOCATE 35,1:PRINT USING" #### ";score2; 
GOTO 108 
PEN 2 
x(1)=3:y(1)=5 
x€2)=37:y(2)=22 
edge$=CHR$(233) :edge2$=STRING$(2,207) 
LOCATE 1,3:PRINT STRINGS(39,edge$):PRINT STRINGS(39 
,edges) 
FOR i=1 TO 19 
PRINT edge2$;TAB(38);edge2$ 
NEXT 
PRINT STRING$(39,edge$):PRINT STRINGS(39,edge$); 
WINDOW #1,3,37,5,23 
CLS#1 
SYMBOL 240,0,68,126,126,126,126,60,8 
bat$S$="1"+CHRS(8)+CHRS(18)+"1" 
clr$=" "+CHR$S(8)+CHRS(19)+" " 
bal lL$=CHRS$(248) 


PEN 3 

LOCATE 2,1:PRINT"Spieler 1 : O";:LOCATE 24,1:PRI 
NT"Spieler 2 : QO"; 

RETURN 

n=INTCRND*¥2):CLS #1:scored=@ 

PEN 3 

FOR i=1 TO 2:LOCATE x(i),yCi)d:PRINT bat$;:NEXT 


ON n GOTO 396 
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378 xb=21:dx=1 

388 GOTO 406 

398 xb=19:dx=-1 

408 yb=12:dy=INTCRND*3)-1 
410 RETURN 

428 GOSUB 608 

438 oxb=xb:oyb=yb 

448 GOSUB 5@B 

458 IF note>@ THEN SOUND 129,note,5@,15,1 
468 LOCATE oxb,oyb:PRINT" "; 
478 LOCATE xb,yb:PRINT ball$ 
480 IF scored=@ THEN 426 


496 RETURN 

500 LOCATE xbtdx,ybtdy:ch$=COPYCHRS (40) 

518 note=0 

528 IF ch$="" " THEN xb=xb+dx:yb=ybt+dy:RETURN 

530 IF ch$="I" THEN dx=2-dx-2:dy=INTCRND*3)-1:note=200: 
RETURN 


540 IF ch$=LEFT$(edge2$,1) THEN 570 

558 IF ch$=edge$ THEN dy=2-dy-2:note=25@ 

568 RETURN 

578 IF dx>@ THEN scorel=scorei1+1 ELSE score2=score2+1 

588 scored=1:note=2088 

598 RETURN 

6808 pC1)=CINKEY (69) >=8)+CINKEY (72) >=8)4+ABS(CINKEY(71)>= 
B)+CINKEY(73)>=8)) *2 

618 IF comp=1 THEN p(2)=ABSCy(2)<yb) *2+Cy(2)>yb):GO0TO 6 
30 

628 pC2)=CINKEY(4)>=8)+CINKEY (48) >=8)+ABS(CINKEY (5) >=6) 
+CINKEY (49) >=) )¥*2 

638 PEN 3 

648 FOR i=17 TO 2 

658 LOCATE xCi)d,ylidtpCli):ch$=COPYCHRS (#8) 

666 IF ch$="" " THEN LOCATE xCid,yCid:PRINT clr$;:yCid=y 
Ci) +ROUND(pCi)/2) 

678 LOCATE x(i),y(i):PRINT bat$; 

688 NEXT 

690 PEN 1 

708 RETURN 

7186 PEN 2:PRINT:PRINT TAB(15)"Ping-Pong":PRINT TAB(15)" 

72@ PEN 3:PRINT:PRINT TAB(14)"Steuerung 

7380 PRINT:PRINT:PEN 1 

740 PRINT" Spieler 1 Spieler 2 Richtung'":PR 
INT 
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75@ PRINT" A 6 AUF" 

76@ PRINT" Z 3 AB" :PRINT 
770 PEN 3:PRINT:PRINT TAB(14)"Oder Joystick" 

780 PRINT: PRINT: PRINT:PRINT 

798 PEN 2 

800 PRINT TAB(6)"Waehlen Sie <1> oder <2> Spieler" 
818 iS=INKEYS:1F i$<>"1" AND i$<>"2" THEN 810 

820 IF i$="1" THEN comp=1 ELSE comp=8@ 

838 MODE 1:RETURN 
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Elektrozaun 


Versuchen Sie, Ihren Gegner auszustechen! Nur ftir zwei Spieler. Mit Tasten oder 
Joystick(s). 


1@ "ELECTRIC FENCING von ALEXANDER MARTIN 
28 ‘copyright (c) AMSOFT 1985 
i] 


48 DEFINT a-z 
58 MODE @ 

68 GOSUB 988 
78 GOSUB 1378 
88 GOSUB 278 
98 GOSUB 1520 
108 GOSUB 1378 
118 GOSUB 1278 

' 


130 ' 

140 REM start 

15@ IF finished THEN GOTO 108 

160 GOSUB 248 

170 FRAME:IF pidir THEN GOSUB 57@ ELSE FRAME: FRAME 
180 FRAME:IF pedir THEN GOSUB 628 ELSE FRAME: FRAME 
198 IF p1sa=-1 THEN GOSUB 678 

206 IF p2sa=-1 THEN GOSUB 728 

218 GOTO 148 


2280 ' 

230 ' 

248 IF j THEN 380 ELSE 480 

258 ' 

268 ' 

278 CLS:PEN 6 

288 PRINT: PRINT" WELCHE STEUERUNG?" 

298 PRINT:PRINT:PRINT:PRINT"Druecken Sie J oder T, dann 


CRETURNI" 
308 LOCATE 4,16:PRINT"JOYSTICK";TAB(5);"TASTATUR" 
318 LOCATE 12,18:1F j THEN PRINT"*":ELSE PRINT" " 
328 LOCATE 12,11:1F j THEN PRINT” "“ ELSE PRINT"*" 
330 IF NOTCINKEY(45)) THEN j=-1 
340 IF NOTCINKEY(37)) THEN j=0 
358 IF NOTCINKEY(18)) THEN RETURN ELSE 31@ 
368 ' 
378 ' 
388 pl=JOY(O8):p2=J0Y(1) 
398 pidir=(p1 AND 1)*-1+(€p1 AND 2)*8.5 
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406 
418 


426 


430 
446 
456 
460 
476 
480 
498 
506 


518 


528 
538 
548 
558 
568 
578 


589 
598 
688 
618 
620 


636 
648 
658 
668 
678 


680 
698 
700 
718 
720 


738 
748 
758 


p2dir=(p2 AND 1)*-1+(p2 AND 2)*@.5 

IF P1 AND 16 THEN p1sa=p1sa-1:IF p1sa=-1 THEN AFTER 
15 GOSUB 770 

IF P2 AND 16 THEN p2sa=p2sa-1:IF p2sa=-1 THEN AFTER 
15 GOSUB 770 

IF p1sa THEN pildir=@ 

IF p2sa THEN p2dir=6 

RETURN 

1] 


p2dir=(CINKEY(4)=@)*1)+CCINKEY(5) =) *-1) 
pidir=(CINKEY(69)=8)*1)+(CINKEY(71)=8) *-1) 

IF INKEY(63)=@ THEN plsa=p1sa-1:I1F pisa=-1 THEN AFT 
ER 15 GOSUB 77@ 

IF INKEY(1@)=8 THEN p2sa=p2sa-1:IF p2sa=-1 THEN AFT 
ER 15 GOSUB 778 

IF p1sa THEN pidir=@ 

IF p2sa THEN p2dir=@ 

RETURN 


pt=piwptpildir:IF pt>25 OR pt<6 THEN RETURN ELSE piw 
p=pt 

pidir=8@ 

PEN 1:LOCATE 3,ptwp:CLS #3:PRINT CHR$(209);:RETURN 
' 


pt=p2wptp2dir:IF pt>25 OR pt<6 THEN RETURN ELSE pew 
p=pt 

p2dir=6@ 

PEN 2:LOCATE 18,p2wp:CLS #5:PRINT CHRS$(211);:RETURN 


PAPER #4,4:WINDOW #4,4,17,p1wp,p1wp:CLS#4: FRAME: FRA 
ME 

PAPER #4,0:CLS#4 

GOTO 570 

i] 


PAPER #6,5:WINDOW #6,4,17,p2wp,pewp:CLS#6: FRAME:FRA 
ME 

PAPER #6,80:CLS#6 

GOTO 629 

' 
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880 


890 


1800 
1816 
1826 
1830 
1848 
1858 
1860 
1070 
1088 
1890 
1100 
1118 


1128 
1138 


pwoe=(piwp=p2wp):IF p1sa AND NOT(p2sa) AND pwpe THE 
N pisc=p1scti:SOUND 132,1280,189,6,1,0:PRINT#1,a$(p1s 


c);:1F pisc=9 THEN 860 


IF p2sa AND NOT(Cp1sa) AND pwpe THEN p2sc=p2sct1:SO0U 
ND 132,100,10,80,1,0:PRINT#2,a$(p2sc);:I1F p2sc=9 THE 


N 860 


IF p1sa THEN SOUND 132,48,780,0,1,1 
IF p2sa THEN SOUND 132,56,70,6,1,1 


pisa=08 
p2sa=8 
RETURN 
' 


PEN 6 
LOCATE 6,1@:PRINT"Spiel aus" 


IF pisc=9 THEN INK 1,2,26:INK 2,@ ELSE INK 2,6,17:1 


NK 1,8 


SOUND 129,18000,0,12,3:SOUND 136,980,80,12,3 


WHILE INKEYS<>"":WEND 
tl=TIME: WHILE t!+2@0@>TIME:WEND 


WHILE INKEYS="":WEND 
CLS 
finished=-1 


RETURN 
' 


a$(8)="111181181181111" 
a$(1)="981681001001001" 
a$(2)="111881111188111" 
a$(3)="1118681111081111" 
a$(4)="1080100181111801" 
a$(5)="1111880111881111" 
a$(6)="111188111101111" 
a$(7)="1110818818610016" 
a$(8)="111181111181111" 
a$(9)="111181111881081" 
FOR n=@8 TO 9 
wielang=LEN(a$(n)) 
FOR n2=1 TO wielang 


IF MIDSCa$(n),n2,1)="1"THEN MID$SCa$(n),n2,1)=CHRS( 


143) ELSE MID$Ca$(n),n2,1)=CHRS$(32) 


NEXT n2,n 
1 
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1140 
1156 
1160 
1178 
1180 
1196 
1208 
1218 
1220 
1230 


1248 
1256 
1260 
1270 


12808 
1298 


1368 


1318 
1320 
1338 
1348 
1358 
1368 
1376 
1388 
1396 
1408 
1416 
1420 
1436 
1449 
1450 
1460 
1470 
1480 
1496 
1560 
1518 
1520 
1538 


b$="Elektrozaun"” 

cS$=CHRS$(32)4+CHRS$(164)+" Alexander Martin" 

ENV 1,=9,2000:ENT -1,6,3,1 

ENV 2,127,0,8,127,9,0,127,0,0,127,0,0,127,0,8 
ENV 3,=9,9008 

v 


BORDER @ 

INK @,12:PEN #4,1:PEN #6,2:PEN #1,1:PEN #2,2:PAPER 
#1,3:PAPER #2,3:PEN #0,6 

RETURN 'Damit wurden die Konstanten gesetzt 


INK @,12:INK 1,2:INK 2,6:INK 3,13:INK 4,20:INK 5,1 
7:INK 6,26 

WINDOW #3,3,3,6,25:WINDOW #5,18,18,6,25 

WINDOW #1,3,5,1,5:WINDOW #2,16,18,1,5: WINDOW #7,1, 
20,1,5:PAPER #7,3 

CLS: CLS#7:PRINT#1,a$(0);7:PRINT#2,a$(0);:p1sc=O:pes 
c=O:piwp=5:p2wp=24:pldir=1:p2dir=1 

GOSUB 570:GOSUB 629 

SOUND 1,10988,0,12,2:SOUND 2,966,8,12,2 
pisa=@:p2sa=6:finished=@ 

RETURN 'Damit wurde das Bild erstellt 

' 


CLS 

PEN 7 

FOR n=1 TO LEN(b$) 

LOCATE 2+n,16 

FOR n2=LEN(b$) TO n STEP-1 
PRINT MID$(b$,n2,1) 

LOCATE 2+n,10 

SOUND 135,20*n2,5,12,2,1 
NEXT n2,n 

SOUND 135,188,0,13,3,1,26 
PEN 6:PRINT:PRINT:PRINT:PRINT cS 
FOR n=1 TO 5O00:NEXT 
RETURN 


IF j THEN RETURN 
CLS 
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1548 LOCATE 7,5 
155@ PRINT" STEUERUNG" 


1568 PRINT 

1570 PRINT" SPIELER 1 SPIELER 2" 
1588 PRINT 

1596 PRINT" A auf 6" 
1608 PRINT" 2 ab 3" 
1618 PRINT" X Feuer 7" 


1620 t!=TIME: WHILE t!+1@00>TIME:WEND 
1638 RETURN 


6 Programme fir Computerspiele Anhang 3 Seite 13 


Amthello 


Kin Spiel fir Denker. Versuchen Sie, die Felder Ihres Gegners einzukreisen und zu 
erobern, ohne Ihre eigenen Felder zu gefahrden! Fur einen Spieler gegen den 
Computer. Nur mit Tasten. 


16 'AMTHELLO von M.J.GRIBBINS 
28 ‘copyright (c) AMSOFT 1984 
' 


4@ BORDER 14 

5@ CLEAR 

6@ MODE 1:PEN @:PAPER 1:CLS 

76 INK @,6:INK 1,174:1INK 2,18:INK 3,26 

8B LOCATE 2,3:PEN 3:PRINT"A":LOCATE 3,4:PRINT"M": LOCATE 
4,5:PRINT"T":s LOCATE 5,6:PRINT"H" 

9B LOCATE 6,7:PRINT"E":LOCATE 7,8:PRINT"L": LOCATE 8,9:P 
RINT"L": LOCATE 9,1@:PRINT"0" 

108 WINDOW #1,2,39,22,25:PAPER #1,1:PEN #1,0:CLS #1 

110 PEN @ 

128 LOCATE #1,8,1:PRINT #1,"SCHWARZ SPIELT IMMER ZUERST" 

138 LOCATE #1,1,3:PRINT #1,"DRUECKEN SIE S ODER W (SCHW 
ARZ/WEISS)" 

14@ BS=INKEYS:I1F BS="" THEN 146 

158 IF BS="W" OR BS="w" THEN Q%=3:N%=8:G0TO 210 

168 IF BS="S" OR BS="sS" THEN QZ%=0:N%=3:G60T0 210 

170 CLS #1:LOCATE #41,4,3 

180 PRINT #1," NUR SCHWARZ ODER WEISS" 

198 FOR T=8 TO 1000:NEXT T 

208 GOTO 148 

218 DIM €%(18,18),P%(9,9) ,C1%4(08) ,C2%4(8) ,CX%(9) ,CY%(9) 

228 11K%=2:5 1252212427: N2%=7 

238 FOR 1%4=8 TO 9 

248 CLCI%Z,0%)=6:04(9,1%) =6 

258 CKC9,1%)=6:C%(1%,9) =6 

268 NEXT 1% 

270 FOR 1%=1 TO 8 

280 READ C1%(1%) ,C2%(1%) 

298 FOR J%= 1 TO 8 

308 READ P%CI%,J4%) 

310 CACI“Z,I%)=6 

320 NEXT J%:NEXT 1% 

338 €%64,4)=3:04(04,5)=8:02%2(5,4)=8:0%(5,5)=3 
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348 
358 
360 
378 
386 
398 
460 
416 
420 


438 
448 
450 


460 
476 
486 


496 


508 
516 


528 
538 
540 
558 
560 
576 
586 
598 
608 
616 
620 
636 
648 
658 
660 
678 
680 
698 
708 
718 
728 


FOR KZ=1 TO 58 

READ AR%,BR%,CR%,DR% 

PLOT AR%Z,BR%Z:DRAW CRZ,DRZ,B8 

NEXT K& 

GOSUB 1466 

IF Q%4=3 GOTO 776 

CLS #1:INPUT #1," WELCHE ZEILE WAEHLEN SIE ";E% 

IF E% <1 OR EZ >8 GOTO 406 

LOCATE #1,1,3:INPUT #1,"WELCHE SPALTE WAEHLEN SIE " 
;D% 

IF DZ <1 OR D& >8 GOTO 426 

IF C%Z(D%,E%)=6 GOTO 488 

CLS #1:LOCATE #1,5,2:PRINT #1,"DIESES FELD IST SCHO 
N BESETZT !" 

FOR T=1 TO 1800:NEXT T 

GOTO 460 

PLOT 270+ (30*D%) ,70+(30*EX) DRAW 298+(30*DZ%) ,89+(30 
*EL) ,Q% 

PLOT 290+ (30*DZ) ,70+(30*EZ%) DRAW 270+(30*DZ%) ,89+( 30 
*EL) ,Q% 

GOTO 548 

FOR MZ= B@ TO 19 STEP 2:PLOT 278+(30*D%) ,704+MZ+(30%E 
a) 

DRAW 296+(30*DZ),7B4+MZ%Z+(030*EX%) ,6:NEXT MZ 

GOTO 468 

VRX%Z=8 

FOR K%Z=1 TO 8 

VRZ=O:C3%Z=D4Z:C4Z=E% 

C3KZ=C3KZtCI“ZC KZ) sC4Z=CAL+C2K (KZ) 

IF C€%(C3%,C4Z)=N% GOTO 598 ELSE 600 

VRAZ=VR441:G0TO 578 

IF €%(C03%,C4%)=6 GOTO 618 ELSE 620 

NEXT K%Z:GOTO 676 

IF VRZ=8 GOTO 618 ELSE 638 

VRXZEVRXZFVREZ 

C3KZ=C3Z-CIZ(KZ) SC4Z=ChZ-C2K (KZ) 

IF C%(C3%,C4%4)=6 GOTO 610 ELSE 668 
C4(C3%,C4%)=Q%:G0T0 648 

IF VRX4=@ GOTO 688 ELSE 718 

CLS #1:PRINT #1," UNGUELTIGE AUSWAHL" 

FOR T=1 TO 1080:NEXT T 

GOTO 518 

EX=EXLSDZA=DAZAEVRXZ=VRX% 

CLS #1:PRINT #1,"SIE SPIELTEN ZEILE NUMMER ";EZ% 
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926 


936 


970 
980 
1006 


1820 
1836 
1846 
1058 
1866 
1878 
1088 
1896 
1106 
1116 
1128 


PRINT #1," UND SPALTE NUMMER ";D% 

LOCATE #1,2,4:PRINT #1,"DAMIT GEWINNEN SIE ";VRX%;" 
FELDER(S)" 

CZ(D%,E%)=Q%:GOSUB 1718 

GOSUB 1466 

CLS A1:LOCATE #1,18,2:PRINT #1,"JETZT BIN ICH DRAN! 


PZ=O:VRXZ=B:VRYA=0 

IF 11%4*J1%4=1 AND I12%*J2%=64 GOTO 868 

FOR K%=2 TO 7 

IF C%(2,K%4) <> 6 THEN 11421 

IF C4C(7,K4) <> 6 THEN 12%=8 

IF CZ(K%Z,2) <> 6 THEN J14=1 

IF CACKZ,7) <> 6 THEN J2%=8 

NEXT Kz 

FOR I%=11% TO 12% 

FOR J%Z=J1% TO J2h 

IF C2C1%Z,J%4)=6 GOTO 1838 

NEXT JAINEXT I% 

IF PZ > @ GOTO 1008 

IF PAS%=1 GOTO 926 ELSE 948 

CLS #1:PRINT #1," SACKGASSE! ICH MUSS AUCH PASSEN. 

SPIEL AUS" 

FOR T=1 TO 1@0@:NEXT T:GOTO 1558 

CLS #1:LOCATE #1,18,2:PRINT #1,"1CH PASSE" 

GOSUB 2728 

IF PAS%=1 GOTO 978 ELSE 998 

CLS #1:PRINT #1,"SACKGASSE! SIE MUESSEN AUCH PASSEN 
SPIEL AUS" 

FOR T=1 TO 10@@:NEXT T:GOTO 1558 

GOTO 468 
IF LC%=@ THEN LCZ=1: RANDOMIZE LCZ:RLZ=RNDCLCH) 


CX1IZ=CXZCRLZ) SCX2KZ=CYACRLZ) 
GOTO 1228 
VRX%Z=8 


FOR K%Z=1 TO 8 

VRA=B:C3Z=14: C4K%=5% 

C3K=CEZHCTACKA) 2C4K=C4K4+C 2K (KK) 

IF €%(C3%,C4%)=Q% GOTO 1088 ELSE 1090 
VR%Z=VRA+1:G0TO 1868 

IF €4(C3%,C4%)=6 GOTO 1108 ELSE 1118 
NEXT K%:GOTO 1138 

IF VR%Z=0% GOTO 1108 ELSE 1128 
VRXZ=VRXZFEVRZ:GOTO 1180 
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1138 IF VRX%Z=@ GOTO 898 

1148 IF PZCI“Z,J%4) < P% GOTO 896 

1150 IF PZCI%Z,J%) > P&Z GOTO 1168 ELSE 1170 

1168 PZ=PLCIZ, SH) EVRYZ=VRXASLCOZ=ADICXACBI=ALL CYA BI =HN%:G 
OTO 898 

1176 IF VRY% > VRX% GOTO 898 

1188 IF VRY% < VRX% GOTO 1198 ELSE 1280 

1198 LCZ=B:VRYZ=VRXA:CXKACBI=AIZS CYA(B)=S%2G0TO 898 

1208 LCZ=LCA+TSCXZCLOZIAIZICYAC LEZ) RUZ 

1218 GOTO 898 

1228 CX2K=CKX2R2CX1TZ=CKXITAZAZVRYZ=VRY% 

1236 CLS #1:PRINT #1," ICH WAEHLE ZEILE NUMMER ";CX22% 


1246 PRINT #1," UND SPALTE NUMMER ";CX1% 
1250 LOCATE #1,1,4:PRINT #1,"DAMIT GEWINNE ICH "“;VRYZ;" 
FELDER" 


1268 PLOT 276+ (30*CX1%) ,70+(30*CX2%) :DRAW 2904+ (30*CX1%) 
7894+ (3B*CX2%) NZ 

1278 PLOT 298+ (30*CX1%) ,70+(30*CX2%) :DRAW 2704+ (30*CX1Z) 
289+ (3B*CX2%) NZ 

1280 FOR T=1 TO 1000:NEXT T 

1298 FOR K%=1 TO 8 

1300 VR%=B:C3KZ=CX1A:C4K=CX2% 

1310 C3%=C3Z+C1Z (KZ) 2 C4Z=C4Z4C2ZK% (KZ) 

1320 IF C%(C3%,C4%)=Q% GOTO 1338 ELSE 1340 

1336 VRZ=VRA+1:G0TO 1318 

1340 IF C%(C3%,C4%4)=6 GOTO 1358 ELSE 1368 

1358 NEXT K%:GOTO 14808 

1368 IF VR%=B GOTO 1358 

1376 C3%Z=C3Z-CIZCKZ) 1 C4%Z=C4%-C2K% (KZ) 

1388 IF C%(C3%,C4%)=6 GOTO 1358 

1398 C%(C3%,C4%4)=N%:G0TO 13786 

1400 CACCX1%,CX2%) =N% 

1418 GOSUB 2728 

1420 GOSUB 1466 

1430 IF PAS%=1 GOTO 1446 ELSE 1450 

1446 CLS #1:PRINT #1," SIE MUESSEN PASSEN": FOR T=1 
TO 1880:NEXT T:GOTO 7786 

1458 GOTO 460 

1460 FOR I%=1 TO 8 

1476 FOR J%Z=1 TO 8 

1480 FOR MZ=6 TO 19 STEP 2 

1498 2%=270+(30*1%) sHZ=7B+(30%5%) WH=HL+MS 

1580 PLOT Z%,WA:DRAW Z%4+20,W%,CACI“Z,J%) 

1510 NEXT MZ:NEXT JZ:NEXT 1% 
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1520 X%=X%+1 

1530 IF X%=61 GOTO 155@ 

1548 RETURN 

1558 CQ%=0:CN%=0 

156@ FOR I%=1 TO 8 

15708 FOR J%=1 TO 8 

1580 IF C%(1%,d%)=Q% THEN CQ%=CQ%+1 

1590 IF C%CI%,J%=N% THEN CN%=CN%+1 

1600 NEXT J%:NEXT 1% 

1610 IF CQ% > CN% GOTO 1689 

1620 IF CQ%=CN% GOTO 1638 ELSE 1650 

1630 CLS #1:LOCATE #1,25,2:PRINT #1,"SACKGASSE" 

1640 END 

1650 CLS #1:LOCATE #1,5,1:PRINT #1,"SIE HABEN ";CQ%;" F 
ELDER; ICH HABE ";CN% 

1660 LOCATE #1,11,3:PRINT #1,"ICH HABE GEWONNEN!!! 1!" 

1678 END 

1680 CLS #1:LOCATE #1,5,1:PRINT #1,"SIE HABEN ";CQ%;" F 
ELDER; ICH HABE ";CN% 

1698 LOCATE #1,5,3:PRINT #1,"GUT GEMACHT. SIE HABEN GEW 
ONNEN!!" 

1700 END 

1716 IF C%(2,2)=Q% AND (C%(3,1)=N% OR C%C1,3)=N%) GOTO 
1720 ELSE 1730 

1720 P%(3,1)=1:P%(1,3)=1 

1730 IF C%(7,7)=Q% AND (C%(8,6)=N% OR C%(6,8)=N%) GOTO 
1748 ELSE 1758 

1740 P%(8,6)=1:P%(6,8)=1 

1750 IF C%C2,7)=Q% AND (C%(1,6)=N% OR C%(3,8)=N%) GOTO 
1768 ELSE 1770 

1760 P%(1,6)=1:P%(3,8)=1 

1770 IF C%(7,2)=Q% AND (C%(6,1)=N% OR C%(8B,3)=N%) GOTO 
1780 ELSE 1790 

1780 P%(6,1)=1:P%(8,3)=1 

1790 IF D%=1 OR D%=8B OR EX%=1 OR E%=8 GOTO 1820 

1800 IF CX1%=1 OR CX1%=8 OR CX2%=1 OR CX2%=8 GOTO 1820 

1819 RETURN 

1820 FOR J%=1 TO 8 STEP 7 

1830 FOR 1%=2 TO 7 

1840 IF C%CI%,J%)=N% GOTO 1850 ELSE 1860 

185B P%LCI%+1,5%)=21:PXC1%-1,5%) =21 

1860 IF C%(J%,1%)=N% GOTO 1870 ELSE 1880 

1876 P%CI%,1%41)=212PXCI%,1%-1) =21 

1880 NEXT 1% 
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1898 FOR I%=2 TO 7 

1908 IF CACI“Z,J%)=Q% GOTO 1918 ELSE 1928 

1918 PACI“Z+1, 34) =2:PLC1%-1,5%) =2 

1928 IF CxCJ“Z,1%)=Q% GOTO 1938 ELSE 1948 

1938 PACIZ,TAt1)=2:PLCI%Z,1%-1) =2 

1940 NEXT IAZ:NEXT J% 

1958 PA(61,2)=12:P4(1,7)=1:P402,1)=1:P4(07,1)=1 

1968 P%(2,8)=1:P4(07,8)=1:P4(08,2)=1:P%(8,7)=1 

1976 FOR I%4=2 TO 7 

1988 IF C%(1,1%-1)=Q% AND C%(1,1%4+1)=Q% THEN P2%(1,1%)=2 


5 

1998 IF C%€8,1%-1)=Q% AND C%(8,1%+1)=Q% THEN P%(8,1%)=2 
5 

2000 IF CACIZ-1,1)=Q% AND CZCI“Z+1,1)=Q% THEN P2%C1%,1)=2 
p) 

2018 IF CXCIZ-1,8)=Q% AND CKHCI“Z+1,8)=Q% THEN P%(1%,8)=2 
5 


2620 NEXT I% 

2038 FOR J%4=1 TO 8 STEP 7 

2648 FOR I%=4 TO 8 

2058 IF CxACIZ,1%) <> N% GOTO 2146 

2068 ICK=1Z-1:1F CHCIZ,1C%)=6 GOTO 2148 
2678 IF CACI%Z,1C%Z)=Q% GOTO 2088 ELSE 2896 
2088 ICK=1C%-1:G0TO 2078 

2098 IF C2CI%,10%)=6 GOTO 2118 

2188 GOTO 2148 

2118 IF 1C%=@ GOTO 2148 

2128 IF CACI“Z,1%+1)=Q% AND CHCI%Z,1C%-1)=6 GOTO 2148 
2138 P4CI%,1C0%)=26 

2148 IF C2CI“Z,I%Z) <> NX GOTO 2238 

2158 ICK=IAZ-1:21F CACICKZ,J%Z)=6 GOTO 2230 
2166 IF CACIC%,J%)=Q% GOTO 2178 ELSE 2180 
2176 ICK%=1C%-1:G0TO 2168 

2188 IF CACIC%,J%)=6 GOTO 2200 

2198 GOTO 2230 

2206 IF 1C%=8 GOTO 2230 

2218 IF CACI“Z+1,3%)=Q% AND CACICK-1,)%)=6 GOTO 2238 
2228 PACICAZ,J%)=26 

2238 NEXT 1% 

2248 FOR I%=1 TO 5 

2258 IF CKxCS%,1%) <> NX GOTO 2348 

2268 ICK=IK+121F CACIZ,1CKZ)=6 GOTO 2348 
2276 IF ChHCJ%,1CK%)=Q% GOTO 2288 ELSE 2298 
2288 ICKh=1CK%+1:G0TO 2278 
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2628 
2638 


2648 


2658 


2660 


2678 


IF CACI%Z,ICZ)= 
GOTO 2346 

IF ICZ=9 GOTO 

IF C%CI%Z,1%-1) 
PZCI%Z,10%)=26 

IF CACIZ,JZ) < 
ICKA=1IK4Z4+1:1F C% 
IF CZCICZ,J4Z)= 
ICZ=1C%Z41:G60T0 
IF CZ(C1C%,J%)= 
GOTO 2438 

IF IC%=9 GOTO 

IF CACIZ-1,54%) 
PZCICZ,J4)=26 

NEXT IZ:NEXT J 
IF €%(1,1)=NZ 

FOR I%=2 TO 6: 
IF €%(1,8)=NZ% 
FOR I%4=2 TO 6 
IF €4(8,1)=NZ% 
FOR I4=2 TO 6: 
IF C%4(8,8)=N% 

FOR I1%4=3 TO 7: 
IF C%Z€1,1) <> 

IF C%4€1,8) <> 

IF C€%(8,1) <> 

IF C%(8,8) <> 

PZ(1,1)=30:P2( 
FOR I1%4=3 TO 6 

IF C4(1,12)=NZ% 
IF CZ(C8,1Z2)=NZ% 
IF CACIZ,1) =NZ 
IF CACIZ,8)=NZ 
NEXT I% 

IF CAC7,1)=Q% 

5,1)=6 THEN PZ 
IF C4(1,7)=Q% 

1,5)=6 THEN P% 
IF €4(2,1)=Q% 

4,1)=6 THEN PZ 
IF C4(1,2)=Q% 

1,4)=6 THEN PZ 
IF €%(8,2)=Q% 

8,4)=6 THEN PZ 
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6 GOTO 23186 


2348 
=Q% AND CZ(S%,10%+1)=6 GOTO 2348 


> N% GOTO 2430 

(1C%,J%)=6 GOTO 2430 

Q% GOTO 2370 ELSE 2388 
2360 

6 GOTO 2408 


2430 
=Q% AND CZCIC%+1,3%)=6 GOTO 2438 


h 

GOTO 2458 ELSE 2468 
PZC1,1%)=282:P201%,1)=2B:NEXT 1% 
GOTO 2478 ELSE 2488 


>P%ZC1%,8)=20:P401,9-14)=20:NEXT 1% 


GOTO 2498 ELSE 2508 
PZC9-1%,1)=282P%(8,1%)=20:NEXT 1% 
GOTO 2518 ELSE 2528 
P%ZCI“Z,8)=20:P%(8,1%4)=20:NEXT 1% 

6 THEN P%(2,2)=5 

6 THEN P%(2,7)=5 

6 THEN P%(7,2)=5 

6 THEN P%(7,7)=5 


1,8)=38:P4(8,1)=30:P%(8,8)=38 


THEN P%(2,1%) =4 

THEN P%(7,1%)=4 

THEN P%C1%,2)=4 

THEN P%(1%,7)=4 

AND C%(4,1)=N% AND €%(6,1)=6 AND C%C 
(6,1) =26 

AND C%(1,4)=N% AND C%(1,6)=6 AND C%C 
(1,6)=26 
AND C%(5,17)=N% AND C%(3,1)=6 AND C%C 
(3,1)=26 
AND C%(1,5)=N% AND €%(1,3)=6 AND C%C 
(1,3)=26 
AND C%(8,5)=N% AND C%(8,3)=6 AND C%( 
(8,3) =26 
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2688 IF C%(2,8)=Q% AND C%(5,8)=N% AND C%(3,8)=6 AND C%C 
4,8)=6 THEN PZ%Z(3,8)=26 

2698 IF C%(8,7)=Q% AND C%(8,4)=N% AND C%(8,5)=6 AND C%C 
8,6)=6 THEN P%(8,6)=26 

2788 IF C%(7,8)=Q% AND C%(4,8)=N% AND C%(5,8)=6 AND C%C 
6,8)=6 THEN P%(6,8)=26 

2716 RETURN 

2728 PASZ=8 

2738 FOR I%=1 TO 8 

2748 FOR J%=1 TO 8 

2758 IF CHC1%,5%)=Q% GOTO 2780 

2768 NEXT J%:NEXT I% 

2778 PASZ=1:RETURN 

2788 FOR Kz=1 TO 8 

2798 VRA=B:C3Z=1%:C4%=5% 

2888 C3K=C3ZKZ+CIACK%) 2 CA%=C4K%4C2%(K%) 

2818 IF C3% < 1 OR C3% > 8 GOTO 2820 ELSE 2838 

2828 NEXT K%:GO0TO 2768 

2838 IF C4% < 1 OR C4% > 8 GOTO 2828 ELSE 2848 

2840 IF C%(C3%,C4%)=N% GOTO 2858 ELSE 2869 

2858 VRA=VR%Z+1:G0TO 2800 

2868 IF CX(C3%,C4%)=Q% GOTO 2820 ELSE 2870 

2876 IF VR% > B@ THEN RETURN 

2888 GOTO 2828 


2898 DATA 1,8,38,1,28,10,10,20,1,38,1,1,1,1,3 

2906 DATA 3,3,3,1,1,0,1,280,3,5,5,5,5,3,20,-1,1,10,3,5 
2918 DATA 8,0,5,3,10,-1,0,10,3,5,0,0,5,3,10,-1 

2920 DATA ~1,20,3,5,5,5,5,3,28,0,-1,1ole3p3e3rdrirlotym 


1,30,1,20,10,10,28,1,30 

2938 DATA 263,1080,263,120,270,130,255,130,255,130,255,1 
48,255,140,270,146 

2948 DATA 278,1480,276,150,270,158,255,150,255,160,270,1 
60,278,168,270,180 

2958 DATA 2780,1880,255,180,270,170,255,170,270,190,278,2 
16,278,200,255,280 

2968 DATA 255,200,255,210,255,220,270,220,270,220,270,2 
30,2780,230,255,238 

2978 DATA 255,230,255,240,255,240,270,240,255,250,270,2 
58,270,258,278,260 

2988 DATA 276,268,255,260,255,250,255,270,270,280,270,3 
88,270,300,255,300 

2998 DATA 255,318,255,338,255,330,270,330,270,330,270,3 
18,2786,310,255,318 

3008 DATA 255,320,270,320 
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3818 DATA 318,355,3160,375,358,355,335,355,335,355,335,3 
65,335,365,358,365 

3026 DATA 358,365,356,375,358,375,335,375,365,355,388,3 
55,3860,355,380,375 

3038 DATA 3880,375,365,375,3880,365,365,365,410,355,410,3 
75,418,365,395,365 

3046 DATA 395,365,395,375,425,355,448,355,448,355,446,3 
65 ,440,365,425,365 

3058 DATA 425,365,425,375,425,375,448,375,455,375,455,3 
55,455,355,478,355 

3068 DATA 4780,355,470,365,470,365,455,365,485,375,500,3 
75,500,375,500,355 

3070 DATA 515,375,515,355,515,355,530,355,530,355,530,3 
75,538,375,515,375 

3088 DATA 515,365,538,365 
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Juwelenraub 


Brechen Sie in das Schlo8 seiner Lordschaft ein und machen Sie reiche Beute! Sie 
miissen jedoch viele Hindernisse tiberwinden - vor allem hiiten Sie sich vor dem 
Hund! Fir einen Spieler gegen den Computer. Mit Tasten oder Joystick. 


10 "RAFFLES von DAVID RADISIC 
28 ‘copyright (c) AMSOFT 1985 
1 


46 MODE @:INK @,@:BORDER @:INK 1,26:INK 2,15:INK 3,25 

50 INK 4,14:INK 5,24,12:INK 6,@0:INK 7,@:INK 8,0:PAPER # 
1,7 

66 delay=208 

78 DIM objx(5,28) ,objy(5,28) ,gemx(5,20),gemy(5,20) 

80 GOSUB 384 

98 GOSUB 720 

100 pause=208:GOSUB 348 

118 IF gems=@ THEN GOSUB 978 

120 PEN 4 

130 FOR i=18 TO 12 

148 LOCATE 15,i:PRINT"BEUTE"; 

158 NEXT 

160 PAPER @:CLS#2:PAPER 8 

178 GOSUB 1178 

188 GOSUB 123¢ 

198 GOSUB 1378 

268 GOSUB 1518 

218 IF rm=@ THEN GOSUB 19898 

220 IF dead=@ THEN 1686 

238 pause=188:GOSUB 346 

240 PAPER @:CLS:PEN 1 

25@ LOCATE 4,3:PRINT"Wollen Sie"; 

268 LOCATE 4,5:PRINT"noch ein Spiel"; 

270 PEN 5:LOCATE 9,7:PRINT"J/N"; 

288 iS=UPPERSCINKEYS):1IF i$<>"J" AND i$<>"N" THEN 280 

290 IF i$="N" THEN MODE 2:PEN 1:STOP 

306 RUN 

310 IF dog=1 THEN RETURN 

328 dog=1:dogx=minx(rm) :dogy=miny (rm) 

338 RETURN 

348 FOR loop=1 TO pause 

358 FRAME 

360 NEXT 

3768 RETURN 
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380 rm=1:xp=6:yp=4:man$=CHRS$ (224) :dog=8:stolen=B8 
390 SYMBOL 246,8,8,8,8,8,8,8,8 

400 SYMBOL 241,0,0,0,0,255,0,0,8 

410 SYMBOL 242,0,0,0,0,15,8,8,8 

420 SYMBOL 243,0,0,0,0,248,8,8,8 

430 SYMBOL 244,8,8,8,8,248,0,0,8 


448 SYMBOL 245,8,8,8,8,15,0,0,0 

450 SYMBOL 246,8,12,13,14,12,12,8,8 

460 SYMBOL 247,8,12,12,14,13,12,8,8 

478 SYMBOL 248,8,24,88,56,24,24,8,8 

480 SYMBOL 249,8,24,24,56,88,24,8,8 

498 SYMBOL 256,0,8,255,129,129,129,255,0 

5008 SYMBOL 251,28,20,20,20,20,20,20,28 

518 SYMBOL 252,0,0,255,255,255,255,255,6 

520 SYMBOL 253,28,28,28,28,28,28,28,28 

538 SYMBOL 255,195,165,60,126,98,60,36,24 

540 ENT 1,12,-4,1 

550 ENT -2,=1000,60,=3000,40 

568 ENV 1,18,1,5,2,-4,1,2,-1,28 

578 windw$(1)=STRINGS(2,25@8) :windw$(2)=CHRS$(251)+CHRS(8 
.+CHRS(18)+CHR$(251)+CHRS(8)+CHRSC18)+CHRS(251) 

588 door$(1)=STRINGS(2,252) :door$(2)=CHRS(253)+CHRS(8) + 
CHR$(10)+CHRS(253)+CHRS(8)4+CHRS(18)4+CHRS (253) 

598 switch$(1,@)=CHRS$(246) :switch$(1,1)=CHRS$(247) 

608 switch$(2,8)=CHRS$(248) :switch$(2,1)=CHRS(249) 

618 gem$=CHR$(144) : obj $=CHRS$(233) :dog$=CHRS$(255) 

620 hitS$=CHR$(246)+CHRS(248)4+CHRS(247)+CHRS (249) +CHRS C2 
52)+CHRS$(253)+CHR$(250)+CHRS(251)+gem$+obj$tdogs 

630 RESTORE 3810 

648 FOR i=1 TO 5 

658 READ minx(i),miny(i),maxx(i),maxy(i) 

66B READ dir(i,1),dir(i,2),dir(i,3),dir(i,4) 

670 NEXT 

' 680 WINDOW #41,minx(rm)-1,maxx(rm)+1,miny(rm)-1,maxy(rm) 

Sadik +1 

690 WINDOW #2,1,14,1,25 

700 CLS #1:PAPER #6,8 

71@ RETURN 

7280 ORIGIN 50,58 

730 INK 6,24,12 

740 RESTORE 3060 

75@ GOSUB 1286 

760 LOCATE 3,20 

778 PEN 5:PRINT">"; 
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786 


PEN 1:PRINT"Fluchtwege"; 

PEN 5:PRINT"<";:PEN 1 

LOCATE 10,2:PRINT"Eingang"; 

pause=300:GOSUB 348 

CLS:LOCATE 1,3:INK 6,6 

PEN 1:PRINT man$;"" Sie, der Dieb":PRINT 

PEN 2:PRINT LEFT$(door$(1),1);LEFT$(door$(2),1);" D 

oors":PRINT 

PEN 3:PRINT switch$(1,8);switch$(2,8);" Lichtschalt 

er CAUS)" 

PEN 3:PRINT switch$(1,1);switch$(2,1);" Lichtschalt 

er (CAN)":PRINT 

PEN 4:PRINT LEFTSCwindw$(1),1);LEFTSCwindw$(2),1);" 
Fenster":PRINT 

PEN 5:PRINT gem$;" Wertvolle Juwelen":PRINT 

PAPER 1:PEN @:PRINT obj$;" Hindernisse ":PEN 1:PAP 

ER @:PRINT 

PEN 1:PRINT dog$;" Der Hund" 

PEN 5:PRINT: PRINT: PRINT 

PRINT" Joystick":PRINT" oder Cursor-Tasten" 

dummy=REMAIN(1) 

AFTER delay*4,1 GOSUB 348 

RETURN 

Ae 


"Erzeugt Juwelen/Hindernisse 
! 


FOR room=1 TO 5 
gemr=INTCRND*8)+2:objr=INTCRND*18)+5 
minx=minx Croom) :miny=miny (Croom) :maxx=maxx (Croom) :ma 
xy=maxy (Croom) 

FOR i=1 TO gemr 

X=INTCRND* (maxx-minx+1))+minx 
y=INTCRND*(maxy-miny+1))+miny 
gemx(room,i)=x:gemy(room,i)=y 
gems=gems+1 

NEXT i 

FOR i=1 TO objr 
X=INTCRND*(maxx-minx+1))+minx 
y=INTCRND*(maxy-miny+1))+miny 
objx(room,i1)=x:objy(room,i)=y 
NEXT i 
gems(room)=gemr:obj(room)=objr 
NEXT room 

CLS 
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RETURN 

ON rm GOTO 1188,1198,1200,1218,1220 

RESTORE 2670:RETURN 

RESTORE 2740:RETURN 

RESTORE 2810:RETURN 

RESTORE 2888:RETURN 

RESTORE 2960:RETURN 

PAPER @:READ rm$:PAPER 8 

WINDOW #1,minx(rm)-1,maxx(rm)+1,miny(rm)-1,maxy (rm 
+1: CLS #1 


1250 PEN 1:LOCATE 1,1:PRINT SPACE$(19); 

1268 LOCATE 1,1:PRINT "Zimmer :";rm$; 

1270 IF Lights(rm) THEN INK 7,10:INK 8,18 ELSE INK 7,8: 
INK 8,0 

1286 READ a$:IF aS="END" THEN RETURN 

1298 IF a$="D" THEN 2188 

1308 IF a$S="W" THEN 2268 

1310 IF a$="L" THEN GRAPHICS PEN 1:G0TO 2348 

1320 IF a$="S" THEN 2426 

1330 IF aS="F" THEN GRAPHICS PEN 6:GOTO 2346 

1348 PRINT" ***FEHLER **x"> 

1358 STOP 

1368 ' 

1378 'Zeigt Juwelen/Gegenstaende an 

1388 ' 7 

1398 PEN 6 

1400 FOR i=1 TO obj(rm) 

1418 LOCATE objx(rm,i),objy(rm,i) 

1420 PRINT obj$; 

1438 NEXT 

1448 PEN 5 

1458 FOR i=1 TO gems(rm) 

1468 LOCATE gemx(rm,i),gemy(rm,i) 

1476 PRINT gem$; 

1486 NEXT 

1496 PEN 1:LOCATE xp,yp:PRINT man$; 

1500 RETURN 

1510 xf=@:yf=@0:PEN 1 

1520 IF INKEY(@)<>-1 OR INKEY(72)<>-1 THEN yf=-1 

1538 IF INKEY(2)<>-1 OR INKEY(73)<>-1 THEN yf=1 

1540 IF INKEY(8)<>-1 OR INKEY(74)<>-1 THEN xf=-1 

1558 IF INKEY(1)<>-1 OR INKEY(75)<>-1 THEN xf=1 

1568 IF xf=@ AND yf=@6 THEN 1638 

1578 LOCATE xpt+xf,yptyf:htS$=COPYCHRS (#0) 
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1588 IF ASC(ht$)>239 AND ASCC(ht$)<246 THEN 15198 

1598 IF ht$<>" " THEN 16698 

1608 LOCATE xp,yp:PRINT " "; 

1610 PAPER @:LOCATE 15,5:PRINT" "> :PAPER 8 

16280 xp=xp+xf:yp=yptyf 

1630 LOCATE xp,yp:PRINT man$; 

1640 IF dog>@ THEN dog=dog MOD 2+1:IF dog=2 THEN 2558 

1658 GOTO 1518 

1660 hit=INSTRChit$,ht$):char=ASCCMID$SChit$,hit,1)) 

1678 ON hit GOTO 1698,1698,1690,1690,1750,1750,1850,198 
8,1978,2098,2658 

1688 GOTO 16008 

1698 IF hit>2 AND hit<5 THEN char=char-1 

1700 IF hit<3 THEN char=chart1 

171@ PEN 3:LOCATE xptxf,yptyf:PRINT CHRS(char); 

17286 lights(rm)=lights(rm) XOR 1 

173@ IF lLights(rm) THEN INK 7,1@:INK 8,18 ELSE INK 7,8: 
INK 8,8 

1748 GOTO 1516 

1756 IF xf<>@ AND yf<>@ THEN 1630 

1766 IF xf<@ THEN dir=4 ELSE IF xf>@ THEN dir=3 

1770 IF yf<@® THEN dir=1 ELSE IF yf>@ THEN dir=2 

1786 IF dir €rm,dir)=-1 THEN 1638 ELSE rm=dir(rm,dir) 

1798 IF dog>@ THEN GOSUB 318 

1800 IF dir=1 THEN xp=6:yp=maxy(rm) 

1818 IF dir=2 THEN xp=6:yp=miny(rm) 

1826 IF dir=3 THEN xp=minx(rm) :yp=13 

1838 IF dir=4 THEN xp=maxx(rm):yp=13 

“4840 RETURN 

1850 IF xp>5 AND xp<8 THEN 1888 

1866 IF xp<6 THEN dir=4 ELSE dir=3 

1878 GOTO 1788 

1888 IF yp>13 THEN dir=2 ELSE dir=1 

1898 GOTO 1788 

1986 PAPER @:CLS:PEN 1 

191@ LOCATE 3,3:PRINT"Sie sind entwischt"; 

1928 LOCATE 9,5:PRINT"mit"; 

1938 IF gems=stolen THEN LOCATE 8,7:PRINT"allen"; ELSE 
LOCATE 9,7 

194@ PRINT USING " ##";stolen; 

1958 PEN 5:LOCATE 9,9:PRINT"Juwelen"; 

1968 dead=1:RETURN 

197@ LOCATE xp,yp:PRINT" ";:xp=xpt+xf:yp=yptyf 
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1986 i=@8 

1996 i=it+1 

2000 IF i>gems(rm) THEN 1510 

2018 IF gemx(rm,i)<>xp OR gemy(rm,i)<>yp THEN 1998 

2020 IF i=gems(rm) THEN 2050 

2038 gemx(rm,i)=gemx(rm,gems(rm)) 

2048 gemy(rm,i)=gemy(rm,gems(rm)) 

2058 gems(rm)=gems(rm)-1:stolen=stolent1 

2068 MOVE 400,150+(stolen*2),1,1:DRAW 520,150+(stolen*2 
»,1,1 

2078 SOUND 129,248,10,12,0,1 

2088 GOTO 1988 

2098 noise=INT(RND*15) 

21808 SOUND 1,3008,10,noise,@,0,18 

2118 PAPER @:LOCATE 15,5:PRINT"Krach!";:PAPER 8 

2126 IF noise<i@ OR delay=5@ THEN 1638 

2138 delay=delay-58 

2148 dummy=REMAIN(1) 

215@ AFTER delay*4,1 GOSUB 310 

2168 GOTO 1638 

2478 ' 

2188 'Zeichnet Tueren 

2198 '. 

2260 READ no,dr$ 

2218 IF dr$="V" THEN dr=2 ELSE dr=1 

2228 PEN 2 

22386 pic$=door$(dr):GOSUB 2588 

2248 GOTO 1288 

2258 ' - 

2268 ‘'Zeichnet Fenster 

227H—' - 

2288 READ no,wiS 

2298 IF wiS="V" THEN wi=2 ELSE wi=1 

2300 PEN 4 

2318 pic$=windw$(wi):GOSUB 25068 

2328 GOTO 1286 

23368 ' 

2348 'ZeichnetLinien 

2350 * 

23608 READ x1,y1,x2,y2 

2378 MOVE x1,y1,,@ 

2388 DRAW x1,y2,,8:DRAW x2,y2,,8 

2398 DRAW x2,y1,,8:DRAW x1,y1,,08 

2408 GOTO 1288 
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2418 -'- 

2428 'Zeichnet Schalter 

2439 ' - 

2448 READ no,sw$ 

245@ IF sw$="L" THEN sw=1 ELSE sw=2 

2460 PEN 3 

2478 pic$=switch$(sw,8):GOSUB 2500 

2488 GOTO 1286 

2698. 

25866 'Gibt ein-Letehen.aus 

2518 ' 

2528 READ x,y:LOCATE x,y:PRINT pic$; 

2538 no=no-1:IF no>@ THEN 2528 

2548 RETURN 

2558 PEN 1:LOCATE dogx,dogy:PRINT" "; 

25608 man$=CHR$(225) 

?257@ IF (dogx=xp AND dogy=yp) OR (dogx=xp+xf AND dogy=y 
ptyf) THEN 2658 .- 

2588 IF dogx<xp THEN dogx=dogxt1 

2598 IF dogx>xp THEN dogx=dogx-1 

2608 IF dogy<yp THEN dogy=dogy+1 

2618 IF dogy>yp THEN dogy=dogy-1 

2628 LOCATE dogx,dogy:PRINT dog$; 

2638 SOUND 1,0,RND*40,10,1,2,31 

2648 GOTO 1518 

2658 PRINT"Schnapp"; 

2668 dead=1:RETURN 

26708 DATA Flur 

2688 DATA L,64,308,226,4 

2698 DATA 0,2,H,6,3,6,22 


2708 DATA D,2,V,4,12,9,11 
2710 DATA S,1,L,4,11 

2728 DATA S,1,R,9,14 

2730 DATA END 

2748 DATA Wohnzimmer 

2750 DATA L,2,308,258,4 
2768 DATA D,1,V,19,12 
2770 DATA W,1,H,6,3 

2788 DATA W,1,V,2,12 

2798 DATA S,2,R,10,11,18,15 
2808 DATA END 


2818 DATA Esszimmer 
2820 DATA L,2,308,258,4 
2838 DATA W,1,V,18,12 
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2848 
2858 
2868 
2878 
2888 
2896 
2980 
2916 
2920 
2936 
2946 
2958 
29680 
2978 
2988 
2998 
3000 
3018 
3020 
3030 
3046 
3058 
3060 
3070 
3080 
3098 
3108 
3118 
3126 
3138 
3148 
3158 
3166 
3178 
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DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
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Speisekammer 
L,2,276,256,4 
D,1,V,18,12 
$,1,R,10,11 

END 
5,4,8,21,0,4,5,2 
3,4,9,21,-1,-1,1, 
3,4,9,21,-1,-1,-1, 
3,6,13,21,1,8,-1,5 
3,6,9,21,-1,-1,4,7-1 
L,64,308,480,180 
F,258,98,294,102 
F,250,306,294,318 
F,398,94,430,106 
F,390,302,438,314 
F,474,240,488,276 
F,474,124,488,154 
F,58,240,72,276 
L,226,308,322,188 
L,160,188,480,108 
L,64,180,160,100 
END 


-1 
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entsprechende Kapitel mit Seitenzahl. 1.44 beispielweise 
bedeutet Kapitel 1 Seite 44. 


A 
UP Fala accccadeBirwtiossectetans tecucavn iy suse dh-saewacaaiaatidinnaedi-vlaatdsniuaktwatentomend 1.48 1.81 5.8 
PRES Seca Gav eedbuesat sta the testes Secor eshieai es Gta craisteadenanae taabeas eam naoshreecoeteae tia meae ses 3.4 
POR TIGR cscuntesiinsststsoted ams vabast iro beras iol Ucthile vata leo hucad Aateae dss, benssn adaanetetts 3.4 9.30 
PS OB yorirccoeteteccanes ti tsccein desert deal teak ou ck needles ea aslo 1.81 5.1 5.33 
AMSDOS-Bereble: sic scceiccieents catty aaivian ned neien aii unnebuenuninmin 5.8 
AMSDOS Fehlermeldungen o........ccccccccccccccccsecsssesscesseesecssessesssesseees 5.15 7.31 
PRINIYS id cascue css cased AAs 2ssGK ta uae dahon dike isanesyaicas eeeia fa hea han oceamsa VEER 3.5 9.19 
PUNTA OG OO) seciass act catucctnnc aca tcts uh utuscncdnesstenenta Biaeoteateca hata Mae 6.16 
PATTER AG ION «fois Sal cl an eeaseiasuti le nica sedshe Armee cobs Mike tera tues he Co Satalnttinn ie, 9.55 
AnschlieBen der Peripheriegerate ............ccccceeeee 1.7 7.39 7.40 7.41 7.42 
Ansehliehen des Compiiters 2.52.0. get aon hares Orient nas iva: 1.2 
APO ORDUCHSE «pice once aa eh gs cis A lads ds Leah samc a iaeaee stdout eaaponictedies 1.3 
PVs Mecsh as tak tts checedes 3 tahcts Saari a ee Aa ott ait iota atien ti dh eter ae aes 6.43 
Fa Gad 20 meer ere er On ag ORB eI 6.13 
Arithmetische Operationen ...........cccccccccesscsesscsseeseeseeseeseeseens 1.36 7.28 7.29 
Arithmetische Operationen (LOGO) on... ceccssecscsssssesesseseeessessesessnecstens 6.13 
POTS aussie eratesasta heer extcacneclcalisleniaes cuitmwsade onan keapiant 2.3 3.19 3.26 7.29 
PaO den said cae Casale aioe y StS 05 ad eNOS Sis eg Seago ad a eR abn ee cadet 3.5 
OIC ED, eat sees piagatsttacecaae iia eat cta tes capes tec cece Sasa tn densa acca a eed 7.9 7.22 
POCTE ZION GR: i5io,60.c ads s aoaesdree testis Maeda anata enatuatbaewlbeune 7.9 7.10 
ASCTII-Datel oo...ccccccscccsscseccssessscssessessees 1.49 3.73 5.4 5.12 5.13 5.14 7.30 
ASCH ML OG OY ise cactenlen saenntathas Maat Serle thy ke sine ata aoc h taal ad soy 6.8 
BPSK 585k ves ahe cscs eisesi Siocae stu nasa cea as eats OS Ae 5.38 
PSS GINS Vi ode ae iersas iodide atic hetyneted ovat clin Meee Ac iah Este cisommananint tai nents 4.10 
POLINA set ceasish natceiatin es Sueslcsoo asi as Robes eb ecco aa ees tes placate te els aaieiaeaes 3.6 
PMS WYER ETO DE \ecssil aucun oe es oresastoaatacchck ss heewialdavsiasaa vans tos otete une eteetedaneastme Ge 1.14 
PUTO ces sole teh cphapestmesan, ea taum ateei tes toe ieeeec comin nedicenniuh ae ee 3.6 2.11 
PANN 5 a ccstat ds cues cet neds wea tans deadionaawsisnitand in dviadeecadvalees Mibast tat atanSeiudsdbigbetaias 5.29 
B 
BE ian Votts icin Seles datca hee Goal ca vhotae eed exten unc cd buen Stead esscovbarsiaasuciaaes 1.48 1.81 5.9 
ERAT IY Fast Sorc stsies aesncgaadaaecseeetbuwss ctedtsert tala gle ote acatlaenhac Mace tent 1.94 8.6 
BANK MANAGER? c.dcscciotasiestercsveisc adap eines ccs Gardasecdaadeugcanmigiesle 1.90 8.1 9.65 


Index Anhang 4 Seite 1 


I BANKOPEN: S.cscahiachenciigctibicnanicncectat naar ons taal ian 1.93 8.5 


|S BANKRBAD) occhesees2t sesacces tev udeccouetsasesvensteoah sis gual nde suo ieedecales 1.93 8.5 
BANE WRITE), secicts oketeckies cutetectteteesc leaves ented addzeiects ate at Gases: 1,93 8.5 
BASIC xcstis isieeeie is teh it eset ots Si ee ees 1.24 3.1 7.33 9.7 
BASIG=Datelen: -csicctcccssbecccssssenceencuxtdsccseel tackassiigttsvsie ease teagesi ac reaveees 1.49 3.73 
Be fella: asc Oececctavataceces oooedoe he Setzbncieh sin tabs bebloie eh evade MRR eats ated. 1.24 3.1 
Benutzerdefinierte Zeichen .......ccccccscccscsscssssessscesesessesseesesesseees 3.81 7.47 9.21 
BE sesso desecocieec teh Hence eri certhes Baek OA oe ete es et ae ona he 6.8 
Brldfangre Gel ane ccpacsecsscosjarecenesseGuvandvesweactsicssutacsSeecabstaucntstanacaish eave noes: 1.4 
Bildschirmabdruck ......cccccccccccccccessceecsscessceseccesstecseecssesesaeenaes 1.50 3.73 5.6 
BildschivmanpassuUnd’ svc secniiencia Arca aubigesslacnasetara aenaiemgu ues 4.6 7.49 
BildsehieMm plane? saicccces selects atthe taps we actastende ea aaea oyeaaelsnen 7.35 7.36 7.37 
bo) Os iain ee neha Con Pi oR Aa NR rT BET Eo eC ear 3.7 
Bindrdateien .....ccccccccccssccssssscsssssecnsecccesssseeenstevsssesessearees 1.50 3.78 5.18 5.14 
BiMiaYSVSbOM: sisciccevacsstevavsd nse ccetayiestnsinge nei Gedikenahesalcaias tod cons bbene Mapenniiadeayieadad 9.9 
Biber ek hoteess & Raiden esa Reariaealaass ate hhc cataaiaeaatcendes 1a eTvesaateeee deat atte 9.9 
Be oitiecd esi at OLA eee eed ee Re ae RR OB So 6.26 
Pe erates sex UR aoe doen Geek Cis es tu eaten cees causa baes abe eta LATS EE 6.8 
Blinkende Farben .....cccccccccccccccecssscccessccceesssecesssesesssesessseessssesesteeeesseees 1.56 3.77 
BOOT GEN wtetsczed vchesesoeetetehh aseecuaaescnsas aitudesinan on Goa atcha teaehiiies 5.34 
BORDER: sects ae Saco AES 1.53 3.7 7.7 
BREAKS witasctiscsvecsosetebisccessovsonstes Gasset tovctessetniee eee as iste es cotar chutes tials 3.7 
BUTTLONP > ctceeccocseede tet ee aie Rea iid eh ee eevee 6.36 
BY Be oi iiteis ces Sateeaces sass bode davsiaddsteieistiee itu eed da agi abe 6.7 6.38 
MB VCS ce scesedeecaeec anaes ccseak os tava rhea cael SG aetna Gee aeceem aoe ause 9.10 
C 
GAGS. So arteecteiclees av Giiedonsc shag eas tasheash Suave ttt ea a ele 3.8 
CAPS LOCK Taste. cascecesscectccstueegeiddeasiden da usatia aiden avcadh ens Cea ceanheooiees 1.17 
CA escola he teioudesloneeds wecteraaaenbet coche pdastene fuck evtawtnsas the seek see soak cobenau tenes 1.47 3.8 
CAT (KaSS6tte) olscciccsdecieds is chess tuvscann te ves caned nuns bask sevneeisatinanlen devedsveasbeass dene 4.12 
CAT CHE orci Ge dk ester eet a stance vende des Susana tiaeand posse eee cereale 6.40 
COEEATING 2225s ee neers vn he dic sl nadia otatade Sune taco td edocs Ghee Daas ieerdecetaNS 3.8 
CHATNIMERGED » wv iscectecciegsstsscs soeessnes acess akateses SEN K is ed ieate as 3.9 
CHAIN MERGE (Kassette) o...cccccccccscscsccssssevsccssccssessesssessseeseserseesereenees 4,14 
CHANGE :cpnngen tela talc citiicae aaUe ena ea aaah 6.33 
CARR ett eect olden c cl teens ers aptadunsatoestentapdtunasdewvece tle vores stathsaee tetera ia 6.8 
GHIRS: fi sieccdedscsedecestitsse oo covdentedesbeeves sibeesbecrserved deasiiaend Gove vund tensile 1.59 3.9 9.16 
GUND oie chit dateca eek Sb cbs lopuded sd tvuaks asta bapaduncat abe casiez fee ea os eae eases ational 3.10 
CLEAN: 25 cccchd oi vest haces shia tls detasodsdiee etvder Secs NPA inane toa a eae 6.22 
CLBAR:®. 2u1oieeid be stann tae ile Se ahi ead shiv et eras: 3.10 
GCLEARANPRUT -.cecicnic eG eia Leo aes eaten Hi tes: 3.10 


Anhang 4 Seite 2 Index 


Gs Pas tt date taeda dae ta Baste ahaa tae eaesthess eens anata odode apo aaa 3.11 


TOADS oc staccato eee Pecans denise atta ted eae th vatoctedets 5.13 5.14 5.36 
CLOSEEN: ch: Sesihesc3e she tecesecss tase cesbectteatan ens heh leioy don ahbiweeias tothe 2.11 3.11 
CLOSEEN (K:assette): sctissccsscsesssudevsee se decediness sued chess seadbedehaserslotedt asshtesateesatee 4.15 
CLOSHOUT: sisccttetin tein tet eet eesti etic dn dotted ends 2.10 3.11 
CLOSEOUT (Kassette) ooo.ccecccccccscccssecsessccsescsscccsseecessscesscssseseascvaaeveaeeentees 4.16 
CLEAR Tastee i. hess cteckiesicetesceediein veceeiede save ives cebievect chicas caevaeusseeetihevna ans 1.18 
ICSD paca ettvens esta estes eave hesette es teetnea, anton tried, Mb ie ek acelin, 1.24 3.11 7.4 
OS Janeane eI tC i UO 6.39 
CONE eas esc tree cteka th ta evo ees ad nese a aha sbodeacde wes A actabostt acne h oar dvett tals 5.29 
CONT! ss Beciliiercelse tice lease hence uensectrchites seinen ae eaevaneniceea eee 3.12 7.30 
CONTENDS? sicccsisaazidets voscatsadvevetea gach osacsecetceastvacs coved Geeta bea bethiadevatesbedadesveost 6.42 
COPY-Cursor-Editiermethode .0......0...ccccccccccccccccessccesecssessesesesseesseeseseeees 1.30 
COPY CHRS 4. Accasiitshiecnss steed acid tee wa hind tesa 3.12 
CORY ON: 84letec a aid cise iets ett hicueecsnn eth ean iu tessa he tga ais aenteana di tdeteas 6.20 
CORN OPE? sccvcs Suck hose ives cceseute ds) ease tedea saved ein siete be aanteecule tn Meenas ataees 6.20 
COR Y= Taste. sitticsiascenisteasianile ved ienorrele relia Ale bets ovine ateiet hes cs 1.31 
COS rears ches eatin seals ieee bo nea be cbcca shine neh GSES ARs OSES dais ode aes 8.12 
COS OG O)s secssccaseiccetsssesacsdcbaeed ancy sahvvus sunte cid tees sarestoetnasiedesestaasvenebevtetecurtes 6.13 
COU IND xe Siciirectah kata tis soekasens ans chad eta dea iochaioiees te cee eck ae aerated 6.9 
CPIM ses cts teecesnerse Mach stiats Sautanrciint ter tatia esinemi ben tenaate sia mace eltoteanred el, 5.17 
CP/M 222 cotvwrek tember titties ton See aes ea 1.88 4.11 5.32 5.33 6.2 
VCP Me esate techs Wc Se RS se S EO tale aE Res 1.42 5.9 
CORALS Aastra cere, Sete ees edocs a act ace atthe hai he osteo 3.13 
CORT saicitehstesns Races lactiatineacuetsarssve cantedetscard ation tee vonedh oie, Ota lgetahet eestteneaé, 5.28 
OS deo nabecee ecvedes tee ata ate a Dana ea 6.22 
COAN Ee cect ct oooh cease ot et hs ce BD Death gti id 5.13 5.14 5.36 
(dR re ee i, ee a Ree nee Ree PY Ber tone ee Pe OND Se ne, ee re 6.20 
CURSOR: sssticcsicteiscbivieced cchicesetises nceitaveevdctdeeateodeshea saben Setadeaeat haeiatss 3.13 7.3 
CURSOR LOGO)! ecco eat cients senses eden aa aden lel he seaeeset 6.20 
CURSOR-Tasten siz. aicsieistececaieteiigiieevavadeevlats havo daa dhs doveadiersasoats 1.15 6.6 
D 
AUT A ss eshsaceesi eas aie beeen sega ns fom Sat aceite halal wet a 3.14 7.28 9.32 
DATA=FoOrmat: (o0ie2 25: cacerd vases cuetas seuest dea tteivievdenbsviebiiedatiatises 1.44 5.33 7.45 
DD) AT Heo recetecuses tel dencethaitss Toke oft S cssean sextet Mee ane oatavtstsnt tule sels v ativan es 5.32 
DEVOTEE 52S ays tedern so bestativaiteadawi ts esinkativas etecupdian Deedes tna becdadr ocuinaacca test otaNids 5.32 
DG-BUCHSems .525.25rcnctsis olasnt oolonch taco terae tle tecoheteeteeune hoe ea eas 1.2 1.3 
|B 1 Maen ee TE eT a 5.38 
DE CB yi eoateiesoeseserdtcs helsseceh eae iei tecsttandad hsnasamcsareleoatat nats Coamuesutes Mra dtianias 3.14 
DDEER x scsccepstdaea de site Ba iecuds sxc eas aioeas eevee cask cea danies sea ieee es aeeed nA od eea ces eatases 6.43 


Index Anhang 4 Seite 3 


ES IN os Stas Aves ccversa sAuteunals abs gcas dh aca uise ieee asco eed dat aniee ia Gon tates 3.15 7.30 
DEW IN Be tancuste euictevscinechdh ee sentaia S inet anss Sica tues og sicko eateniedind, Gea Mya eea eee. 3.15 
UF 2 gare ea ne AeA PN PY EA 3.15 
DORE A osgarces arise deeds ees kere sa tacounn Mesa aw ec onus Meare taasanssa ued ieee paedacanaione 3.16 
BOBBLE, sssiss visser vssli oan che hawhan easugices Soe ooukeeaast wma sebentaniteoMteai Ghar oans aadeeas 3.16 
DO Besa ihaeareerere ort tenes aasnnnar ious aii eatin aman ha Oc es 3.17 
BEE > asin sscee tp orcrstahutes tanernareineactr et acre cate ate te as aula deeded dase ca 3.17 
DO Fea te sche ie cate reeset cacieee cctaceaeastrarsanehtphnnnde octets shal@la Siautedtle te terse ahd 1.16 
PE POSID 2 cacy cettaeluicil ates tues Zacsltv sav edacatuag hte oesaas eecaata nelpuscestahesauesnesdbesdtiedvnis 6.42 
DOR pst iesias tes aba teaterontacece seuss tap tas tenet tana ee Sadigete ances 3.18 7.31 7.32 7.33 
TEE GS Saree ak tetas al sek cen carl coe a gl te Gala ata ie tunag ces 5.28 
ED Desa aiaatanesn Wsaadaknets See tanaee acest tin cosa tegeseses ented eh iiciaininahies Beales 3.18 9.32 
DIUND. cc vaietacta rates aug enty sated elses qentaseaesaapsacieceat sawn saa maaeuiainian itoge 2.3 3.19 7.28 
PDIERE. ds ascsutotitvaawctitaed 02 vaktencauascdcintaced de ahaaeenuytocaaanigiad eeaaisatadaaelel oi ahacw 5.9 
DI ROEM vetcietrcrateres cured dau bess bias axtchaalenaat one maaan 1.43 5.21 5.30 
ABA ig GW OLE) 8) Saeeeeee tart eee hy tamer nity tt Une e Or PONT Car never eres IE UIE TA 6.33 
PIG ecatinmi on nensy cach wlene Genet seats dus tate atv i ladane, eat nnuetiviseee dead teniiaats 6.34 
DES fh cee rac pet eseeat ici venta valine aeuie alencushaeehicahateelte ani tonae itastta: 5.22 
POPS N05 esctae ioe cas abe teana dS aces tots hcaarsasitein pea tear catia tl cipro tem catae hand setat asta 5.22 
DIVES Cn sositatindes ci ettnrAn tient ela Luiitettem miele ate Pte Ea TS, 1.82 5.9 
DISC DRIVE 2-Bathse® 252020038 ies os shai cereal avdeduent Seitehdens 1.9 7.41 
UD 0) 15 Gal tine pay ere eater meen 7 eer tee re oe ren 1.81 5.9 
MT SCT ota cesdatententt ata esonsetsstcheas tains dest tovinnetantariens nace Coed adald 1.88 5.36 
DESCHTES sas si cete rasa cress vccuttensgrass etsadon vealed ele Maps os oceania 1.43 1.83 5.24 
WESC Ts xestsereastes dees otter a vance auc vases states inaestoceoavamionace bes 1.81 5.10 
DiS Gen = oc5ycdy zai encowtssavisunestev neces ter viontietuesbenidal de lsiads an baialanesieasae 1.11 4.1 
Disketten Cinle gen ict. ts cissvix tease snschensarioascancesarstaatontiativincesisaistamaaeenees 1.11 
Diskettenlaufwerk (zusatzliches) .............. 1.8 1.14 1.43 1.46 1.86 5.4 7.41 
Diskettenorgarisationies.isscsscssisssiorseseks cdvesanessiacvacsosacsexevesdesuvsssceasgascbtnvedeavons 7.44 
Nes cicscsg aonaaee Secs nicer ica tuaa Musee toate Cea Suis awe mn Ok. ans 6.22 
DOT Sais Seiiliaeshnte ud ania reese ve atta diatnoos as conaueisonaram ee atest ates eed eth ns 6.23 
DORA WY osc dueciln ity ier ncudaathe cadsuitaneiu lane din Muss tubes rac eclseh indies teacttestdeaniree: 1.63 3.20 
PECAN ER ses Poeeiiea ee Gaysotszowvese'ss eset aieetaasts aode Sean Cal ad eata rs centaharsin ce bactaeerasion oaks 3.20 
USL IE. csoccndzsor ttt cae, reset tonne A ater einae Dias ahahaci tle Mid eiastateiersh 5.10 
DRT VSR SSA. sistaclesa sa ietalidediicsnsles sd asd aisodaa se vsaaaiad aaah enon wn sea sasessariebebesteds 4.10 
OE ER 2 at recent oct sha doce casas aitaes in siSituaieas ne aden oes tan 6.2 
POPC OY tesa tintertcraa Satan at ca iictos Mali valtia dicen as ease bioe Staeeeaaiaas 1.8 5.26 7.42 
Prue fOrmatier ng of iig sdisss is aiswnivay anv ostrscabiesausapawsobehsdisastindmeaaalses 3.63 9.22 
DUNE cscade cadences tana se Ses aan nous aa sedsivsd schincentuasvanands eauinempaazéoseaeetna vs 5.38 


Anhang 4 Seite 4 Index 


BED otra Bie as has cesedh eaesos wees u dea aes Pe RU Ue vg ces a Reena Sade Bela heen tasaae 5.38 
BGO ong chica Dassen Taseureed Uavslssapscy tons deat oe wate oa cadumaes tacibeteidaa cada tuenmenatins 6.19 
Pe VAT es 2 jeclac hag sine cdosses Deas basses VOY tl avcn Aan csa eos eles ean siemens ext beheae 6.19 
EDR? ogre icchc ieee as ofa evah aca cisaa gsc awedl see saan iodo ae aoa Poaeeteetat Shenae 6.20 
BODE seciivees ctu tathecteatovassentunl ss teseaias verte: react INE uaa eeea nation cen ad uatgpe 1.30 3.21 
OGILIGYOH, — 5505 denicsaithirdcciptasnanes vcuateceseets siete acehateris Gaston otun Cpteentea atenteoe a suest 1.29 
Editieren (LOGO): civssceiiienvisst eeccetgsiutliced any ectzsteescisyade sadenssaadeavectidiereshes 6.6 6.19 
EEL. h.csesihteots oh tevursconenacshoctsvaecvasteubuywes js bleweuc da nen lain ed aa ea Maeaeea ea 3.21 9.32 
Einschalten des Computers o.......cccecceeccesccceseeseceseceeeceaeeeesseeeseaneeasanenes 14 1.5 
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BANA COG). issn et aise eteaan, OS teciserarn un eentapunaeiates ohasiae aes 6.38 
LORY aocstecesovsasivebiskctvctedossvistoe det etd td oe Bees eete 3.26 4.15 5.8 7.30 
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BING ica sox tencr asennad cates cece ace seta eine tas rasa bee ea a ae oes scene meee 6.30 
ERR eteeet sees aah aaah sation ede de anes dasesactaes eoeeod ua dae Pemeeaces tae a Pane tes S21 T88 
BORA D ssea cst cain cas sera toca eee eae es ea ee areata ala 6.42 
FRR RORG » oes vsrie used ots sanesueneat Goneabee tect adotaaes nuevo nto eeentandsee nadataemyctelaucnees 3.27 
ERROR (LOGO): ccseccsicstecssehacicteesetuciieee She OU act ee SE Seine ate 6.40 
IP WEILETUNESZOICNOR: fee, ceva udrra sl udaccatvacn yee a tiseutsmaniatene oe mide usaunete 3.39 7.23 
BSC PASCO Z conamuixsteniitelt nmhettens weal imeniaad ers Accu cram atet 1.18 3.51 3.52 
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BEDE bide descehevess cas daces sg edzszes he ldsshacensatcde suctosas cs sed edoenseiullens Saree reat ieedesatenans 6.24 
G 
GENGRAEF 2204 cieetoh bh ater a tetas eerie teh deta Medes 4.10 
Geschiitzte Dateien oi. cccsccccsssecssscesecesseesecsasesssevsaseesusonsnens 1.49 3.73 
GETS Tete sas sees ts eacae aati chet ca Rosai sate, NE Cb aster ch an athe Tee sh 6.32 
GO Ee Bei Rise dedtcltat os Sect beats Bee AEE AEE Bg Nc) 6.39 
GOS UB) mecs25h oscesrcuattaltes eesscd neces beavesthoshangniserstasamittnats aoeers 1.34 3.32 7.28 
COTO eee ces b sev Seca as coecn peek ais Staten ddesseveedd naked estas tae ue tans deed eatases fh Aausesre: 1.26 3.32 
GRAPHICS PAPER oooo..eecceccccccccccsecsssecsecscsessvesscessstseescessessessusensesons 3.82 9.51 
GRAPHICS PEN -#icicienetivatisaveieicuniadinatinwn ada: 1.69 3.33 9.50 
CRA EEG ah cone Seatigest isang haa sa le aetleatopant est oes 1.51 1.59 9.49 
GPRORP Eo oecsctete ln assahalatiasittlsan seisostinitca tessa de tasteptas shi stossepnctrntaseeitcces 6.32 
Cr iced hoe oc tat scree ut te Abtev ash teeatial, btetan ba eke tata AOR ae lta pees eee o06 4.9 


Anhang 4 Seite 6 Index 


PLANO W AE 0, Ueesiaston tas ental che Raat oly lai ht aed ateS Caan aT Ste tls, os 9.1 
Fle li gicers re ler sfc. ince cunsst 5 wove seaver vue aeaosorbecadtes ti nce ouleel SON tee scsihaea ie aaaep 1.4 
FIR P- PROpPaiiy “ycsatanessbatisea chants widest Cases aun aia ames venteutodenndiemaees 4.3 
EL ND ce csy rec ook ceases ind Ss atbae nantes ch we aabanid cacsataniieesase eaaies ance ina anata den 3.33 
PICK ACEZ INA) SV SLEMI: Aectecctlensnote nae tg han cece ate slee Spun contehie ty tees Cab ecauna tes 9.11 
PUEIVELOD: foi Si ciest ares iedvas oan oettacieatey Men vstscs a sussepans Sdeuteustigs CRieap ea ene 3.34 7.47 
PINT os ae cou costa yon eaeet wipe th a raersetn aaa gna ad Os ons aint x geal anaes lewis 6.26 
TLE scstinni 0A ctcess tite tein Maaoenad doa tata zanna diaupavns satel Secdaeas li eattaonlatsaesaemeeas 6.27 
Ele) erieviem plana 8 055.20 jesse ssaesydulnnameaaasbest eticote e eeaelee eaakeaseateemn cannery 7.38 
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DINU Jsezstssc tera vxy atimnesutesh tactueig tuviccs Aatcotarcatatecauteae tl ceue dels tlel a teoal ass 2.5 3.38 
IEIN GE o2) ir eatin, sc ahcah arenas ats halla otc nt Saba thn hia coat ceathe et Ce aril Covad 3.38 
PINTS) Wo giczectt ecstins cs hosteisea vecatias descrwens tatu oetnanashaatiehsvauas.e Raat a eee beasaedetee 6.13 
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ERO stsce fetstet aes cul gscs Rick casts ct ona Sutpuch Se ediat nattogateasast Gabel Seats athe taans eines 3.88 
ROVING oi gases sates vec ticcire Seco Se ee pu iba LeSed es oes es Tusa OE Tea ede ean thas use ata vee 3.88 
EP RCTs a sertid coreshcohted bach Gent dgc hha al tne taukecruseth wane Aeteawiseulial a Cann ates 6.43 
IS a cdeoktttces Meese ears Ldvectdeeesbiedeanten cod eA eieteaundnins laren ear iaette 6.21 
EEE cc sasmiscieet Gi sabanc cots ditt resent eaoa ede mainens aaah ada ance Co esemiansiesael auteMee Mails 5.23 
TEV PB CRIED? -srcoctuas date devel tel ari taid se buseida att Saaiiten eons a len Set aenenoscinia args 52380 
PY PEMOGO): oo tect heiaetnclatoetusiee aint tnttceten tances eer ate alalte iatess 6.22 
U 
WG eo iede tetas astonck eae a EEA TE A eee OR ateinelineiees 6.12 
MIND aay aastaceusten charac tte vcsaatha usu ete siuctstetucc aati tuteeaana setae inch Yas opcck shite astenta nesadet ese 3.88 
RTL OP OCH NDR okies cove crate etiuiuetiian ss nccunvacesantaustanenieasd alg agcoaaboul tr nieecise 7.8 9.30 
Uniiversalzeiche nn. .....c0.s5.ésssccedeaisstaressdsavechaseniseusevasGeevstscecsscgeversiavaatoasoastestans 5.5 
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Se its Re ae te eect tl SUR Rig eRe Reka se Meters er cataetca g 5.23 
USER osstscdsrcsassscthesetensaed cost taactoccscaest bautast oar ndstoa uauntectiwenntiiduer Gaccezeieieens 5.23 
UST R a iccs av vachatetionsstnosiintsstetti ors hed Ritetaviamt otamah aA e eet 5.11 
SEIN Giticcisss cscs chee eRe ies ea eh helene eh Mat eae 3.89 9.24 
V 
Neeser ciese ete a8 lcd casacc Seth deuacas ema daa tan euaatiesnGs fats oelseall oie sek aati de DOS As 3.89 
Warla Dlemia' secede enititesdicccctavetiacteekd tieeet evita Ss ttuineeacdaeeelinn es 1.28 7.33 9.16 
Verndor-Format .....ccccccccccecsssscccssssccsssscessesesecsssessecssssessreserseeesees 1.44 5.33 7.45 
NUL ACO sacs hotest hcceriesee Sa chek teehee a saes tase Sees Gok ease buses evade aad ea Gea a 9.42 
VOPfohrprogtann nt 95902. dss ess tuniavatesbioduntinattjeantiiieeeereparwecndaniaaaninerenttL 1.21 
N POS esses csteccrtebeleilinn REIL aoe tates AE A bee Se 3.90 
WwW 
WEA TE tard ct sahoreibete uri seet dh terete te Ns steel ced Drache Sate he hs ake tate A 3.90 
WATE (CE OGO) see sieeiieiera ad eetsiiaend ies cen ain inn aos 6.40 
WAT CG ose ee Fa eR A i aa Sl 6 eat Ee ont alsa OE AS 0 6.41 
WEN Diiieicctie ewe LeU ee ae a Ste es 3.91 7.31 
IW EL Ri osts Setvc cee coeticeceucscusscetiuetueteeate civic wise yeahs sas amoeg lotta esate Rav ede aad naattecs 6.12 
WHIIGE: inetd tetanbes es ecient ah ng ectcsa naomi dae ee 3.91 7.28 7.31 
WIDE: 8s cide cloneashenabtesacctantensaitessnpedes tho etdes od vn istcnscoursesssns patentee tet teas 3.91 
WEIN DOW. = sscseecc lots cack oe ack anaes ence 2.12 3.92 7.6 9.27 
WINDOW (LOGO) ss cxscdisdiscidicsicecalasedicoede osbasnaseivesne delice coadtebecsevolaceswtesvenshase 6.26 
WINDOW SWAP sii fin ea 3.92 9.28 
WORD” ves. geiscsseclssi Sostcevinescossesecdes Ie eouead dealt abut vdeeedvca Wed ipeeani teh ast aoenoebase 6.12 
WORDP 2 oiccs5 cece Bocteaeehesels covet Sothvauts belts teen stuchitee Ue eee ewes aaa 6.13 
WRAP rsesecoccaieistdacsacetfeccs sbseechcsvuzesasai cepnuadevead este ea ee Re eo aa ae eee 6.26 
W RID By eases docs teercatori ttscoosiietcuts te stioesbeltestagneed, lett ttieth ates 2.10 3.93 9.24 
WRITE (Kassette): c.cis.iscciccsie lesccistesbecedes cds sdicsdadicansdateg Mivdateiveiatarcecutvsveeeds 4.16 
D4 
MOR Shite nits etal cette e cote Nt oe he aor, st One ed daha saemeran es 3.94 9.21 
MPOS -deceland aetaiiedtdn esis tealt at oe aed tee es Lt oe aad eters ek bes 3.94 
ROUIB: crcsilcocsclavodseevadeveMewsectuave res tivtbo Partin leathadaagutunia Reaeaacstateed esata da 5.38 
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EM OE iveds easuoer stats Gens sas stead estan cohen ea seca evened el at 3.95 
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ZeiChen: -xcchesysigescreeas eas naxccaeieeeni ncaa metaeniataae 1.59 7.9 7.54 7.56 9.14 

AAT VSZ ATTY 6 5c state caetinc veou vista sas opens ors aaua) tno tunn tabeneeNias mal ocinatseaaperumates 3.71 

7urucksetzen des: Computers assoc, setts cs ewiakepenisasusecesecendenschestasustanoenss 1,21 

ZaSatz richie: ROMS 5, citiiasresccecadiesiaen tonceveaheenthaeviaaataeanavasadeh caapah eared Avass 7.49 

DACUIN TG ses Sed tira staat tral seed oe festa cole w Tv skan ie Banaue aoeascheassaaen euemnaseebaee 3.95 9.23 
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geht in die Vollen: 


—Professionelle Anwendungen 


—~Schneider »ComPack« Sofortfakturierung .............. DM 98,— 
— »ComPack« komplett ............ DM 798,— 

~-Das kommerzielle Anwendungspaket fur kauf- Lagerverwaltung ............... DM 129,— 
~__ nannische Verwaltungsaufgaben in Kleinbetrieben 
~ Teilanwendungen: Debitorenbuchhaltung ........... DM 98,— 
-—Systemdiskette komplett mit Kreditorenbuchhaltung .......... DM 98,— 
_~ Benutzerhandbuch sowie 

—Anwendungsbeschreibung ....... DM 129,— Sachkonten .............--22 0. DM 129.— 


———//oraussetzung bei Einsatz mindestens einer 
_~ der nachfolgenden Einzel-Anwendungen) 


_Auftragsbearbeitung 
—und Fakturierung, Debitoren- 
~_ Quchhaltung, Lagerverwaltung ..... DM 398,— 


—= 


~-_Schneider-Kunden-Service: Auskunft Uber Seminar und Hotline-Beratung 
"i unter der Telefon-Nr. (0 74 31) 7 29 33 


—_——~ 


eee und Beruf 


_~Assembler/Disassembler ......... DM 145,— Hisoft-Pascal ..... xy do DM 215, = 
~__:komplett mit Diskette und Handbuch) (komplett mit Diskette und Handbuch) 


qe 
_—Jnsere Software-Palette wird standig erweitert. Fragen Sie Ihren Handler nach den aktuellen Neuerscheinungen. 


_ schneider 


MMC IN 
MCR LEY ISI 


»lexPack« 


Die professionelle Textverarbeitung _ ; 


Diese professionelle Textverarbeitung auf 
Diskette kann durch thre Vielzahl von 
Moglichkeiten fur verschiedenste Zwecke 


eingesetzt werden. 


Zum Programmpaket » TexPack« gehort neben 
der eigentlichen Textverarbeitung auch eine 
komfortable AdreB- und Dateiverwaltung. 


Die Leistungsmerkmale des »TexPack« in Stichworten: 


® Zeichen einfugen und loschen 


® Zeilen einfugen und loschen 


® Absatze einfugen und l6schen 


® Begriffe suchen und ersetzen 

® Wort loschen, Zeilenrest 
loschen 

® Zeilen aufbrechen und 
anschlieBen 

® Bausteinverarbeitung 

® Adrefibe- und -verarbeitung 

® Jextbreite bis zu 240 Zeichen 
pro Zeile 

® FlieBtexteingabe 

® Randausgleich auch zur 
nachtraglichen Anderung der 
Textbreite 

® Block- oder Flattersatz 
waniweise 


»FD-1« Diskettenlaufwerk 
als zweites Laufwerk 


® Freie Wahl des linken Randes 
fur beliebige Textabschnitte 


Folgende Druckausgaben sind 
variierbar: 


® Schriftbreite 

® Zeilenabstand ein-, 
eineinhalb- und zweizeilig 

® Formelschreibweise 
(Hoch- und Tiefstellung) 

® verschiedene 
Hervorhebungsarten: 
Unterstreichen, Fettdruck etc. 

® Normalschrift oder 
Korrespondenz-Qualitat 
(Near Letter Quality) 


»CF2« Diskette 


Schneider fiir den »CPC«<- 


e) 


| 


€\.€ 
. 


( BN fh bal a po DO) F ol ot o€ ll ok att VE ell | 


Drucker »NLQ401 « Traktoraufsatz »SFT 401« 
(Near Letter Quality) zum »NLQ401« Me 


Unsere Software-Palette wird standig erweitert. Fragen Sie Ihren Handler nach den aktuellen Neuerscheinunger.. 
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